From bf0fd32caa22601fa856ae8c7878dc2e856744ac Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Thu, 12 Dec 2013 00:36:35 -0500 Subject: Display buffer for mail sync --- init/km-gnus.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/init/km-gnus.el b/init/km-gnus.el index e37ba1d..8e22e28 100644 --- a/init/km-gnus.el +++ b/init/km-gnus.el @@ -21,6 +21,10 @@ (defun km/sync-mail () (interactive) (let ((bufname (get-buffer-create "*Mail sync*"))) + (with-current-buffer bufname + (view-mode 1) + (goto-char (point-max))) + (display-buffer bufname) (start-process "mail sync" bufname km/sync-mail-cmd))) (defvar km/sync-mail-cmd "~/bin/sync-mail.sh" -- cgit v1.2.3