 (defun test-logs-dir ()
   (format "%s" "_build/test/logs"))
 
-(defun erl-open-ct-suite-log ()
+(defun erl-eww-ct-suite-log ()
   (interactive)
   (let ((file (format "%s/%s" (test-logs-dir) "suite.log.latest.html")))
     (message (format "opening: %s" file))
     (eww-other-window (to-file-url file))))
 
-(defun erl-open-ct-test-log ()
+(defun erl-eww-open-ct-test-log ()
   (interactive)
   (let* ((test-name erl-run-testcase-current-function-name)
          (suite-name erl-run-testcase-current-module-name)

  (interactive)
  (message "running erlfmt")
  (when (or (string-match-p "/edt/" (buffer-file-name))
            (string-match-p "/aecontent/" (buffer-file-name))
            (string-match-p "/aewatchdog/" (buffer-file-name))
            (string-match-p "/aeextend/" (buffer-file-name)))
    (shell-command (concat "rebar3 fmt --write " (buffer-file-name)) nil nil)
    (with-current-buffer (buffer-name)
      (revert-buffer nil t))))

;;; Tmux automatiion
(defun erl-emamux-tmux-run-line()
  "Add . suffix to a line and run in tmux"
  (interactive)
  (emamux:send-command
   (let ((line (emamux-get-line)))
     (setq line
           (cond ((string-suffix-p "," line) (string-remove-suffix "," line))
                 ((string-suffix-p "." line) (string-remove-suffix "." line))
                 (t line)))
     (concat line "."))))

(define-key erlang-mode-map (kbd "C-j") 'erl-emamux-tmux-run-line)

(defvar edt-docker-container
  nil

    (erase-buffer)
    (grep-mode)))

;;; Common test log viewing

(defun eww-other-window (url)
  (save-excursion
    (progn (eww url)
