branch: master
commit 65521354115e2a6ab7d8d2073a273a72208220bc
Author: Thierry Volpiatto <thierry.volpia...@gmail.com>
Commit: Thierry Volpiatto <thierry.volpia...@gmail.com>
Improve how error buffer is displayed.
* dired-async.el (dired-async-after-file-create): Do it.
---
dired-async.el | 7 +++++--
1 file changed, 5 insertions(+), 2 deletions(-)
diff --git a/dired-async.el b/dired-async.el
index be6a68f..3f62cd5 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
