summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2015-02-20 23:53:29 -0500
committerKyle Meyer <kyle@kyleam.com>2015-02-28 00:29:48 -0500
commit89b1a7e0aaa7f9d1be4cadc2f366f13b07f29b65 (patch)
treea7dccd70ebd8660308e27767c9ab344f8629e1cf /lisp
parentb4a890c2e219de2c4b247de2d6d6783b0a1bf73b (diff)
downloademacs.d-89b1a7e0aaa7f9d1be4cadc2f366f13b07f29b65.tar.gz
sync-mail: Rename variable
Diffstat (limited to 'lisp')
-rw-r--r--lisp/init-gnus.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/init-gnus.el b/lisp/init-gnus.el
index a5011ff..cce82b8 100644
--- a/lisp/init-gnus.el
+++ b/lisp/init-gnus.el
@@ -30,16 +30,16 @@
(defun km/sync-mail ()
(interactive)
- (let ((bufname (get-buffer-create "*Mail sync*"))
+ (let ((buf (get-buffer-create "*Mail sync*"))
(default-directory "~/")
(process "mail-sync"))
- (with-current-buffer bufname
+ (with-current-buffer buf
(view-mode 1)
(goto-char (point-max)))
- (display-buffer bufname)
+ (display-buffer buf)
(if (process-live-p process)
(message "Mail sync process is already running")
- (start-process process bufname "sync-mail"))))
+ (start-process process buf "sync-mail"))))
;; http://www.emacswiki.org/emacs/GnusSync
(defun gnus-grace-exit-before-kill-emacs ()