]> code.delx.au - gnu-emacs-elpa/commitdiff
Improve how error buffer is displayed.
authorThierry Volpiatto <thierry.volpiatto@gmail.com>
Sun, 1 May 2016 11:41:25 +0000 (13:41 +0200)
committerThierry Volpiatto <thierry.volpiatto@gmail.com>
Sun, 1 May 2016 11:41:25 +0000 (13:41 +0200)
* dired-async.el (dired-async-after-file-create): Do it.

dired-async.el

index be6a68ff0e97eb90c73eaf6dd4660897eac226de..3f62cd58dd915835930c2c2b9f25905cad6c45b2 100644 (file)
@@ -127,10 +127,13 @@ Should take same args as `message'."
   (when operation
     (if (file-exists-p dired-async-log-file)
         (progn
-          (pop-to-buffer (get-buffer-create "*dired async*"))
-          (erase-buffer)
+          (pop-to-buffer (get-buffer-create dired-log-buffer))
+          (goto-char (point-max))
+          (setq inhibit-read-only t)
           (insert "Error: ")
           (insert-file-contents dired-async-log-file)
+          (special-mode)
+          (shrink-window-if-larger-than-buffer)
           (delete-file dired-async-log-file))
         (run-with-timer
          0.1 nil