From: Thierry Volpiatto <thierry.volpiatto@gmail.com>
Date: Sun, 1 May 2016 11:41:25 +0000 (+0200)
Subject: Improve how error buffer is displayed.
X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/65521354115e2a6ab7d8d2073a273a72208220bc

Improve how error buffer is displayed.

* dired-async.el (dired-async-after-file-create): Do it.
---

diff --git a/dired-async.el b/dired-async.el
index be6a68ff0..3f62cd58d 100644
--- a/dired-async.el
+++ b/dired-async.el
@@ -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