summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Julien Danjou <julien@danjou.info>2010-09-01 16:43:10 +0200
committerGravatar Julien Danjou <julien@danjou.info>2010-09-01 16:43:10 +0200
commitf7bba26bbb4739a88d806a0e45768b3aaeba354b (patch)
treef2e82df0b73f766ccb97e259ec3bfbf274396892
parent0207a87bb12df2a2af7f6c1db50b65048e4c1a06 (diff)
Use and fix offlineimap-get-buffer
-rw-r--r--offlineimap.el11
1 files changed, 7 insertions, 4 deletions
diff --git a/offlineimap.el b/offlineimap.el
index f8da4b5..6251845 100644
--- a/offlineimap.el
+++ b/offlineimap.el
@@ -84,9 +84,12 @@
(defun offlineimap-get-buffer ()
"Get the offlineimap buffer."
- (let ((buffer (get-buffer-create offlineimap-buffer-name)))
- (with-current-buffer buffer
- (offlineimap-mode))
+ (let ((buffer (get-buffer offlineimap-buffer-name)))
+ (unless buffer
+ (let ((buffer (get-buffer-create offlineimap-buffer-name)))
+ (with-current-buffer buffer
+ (offlineimap-mode))
+ buffer))
buffer))
;;;###autoload
@@ -107,7 +110,7 @@
(defun offlineimap-resync ()
"Send a USR1 signal to OfflineIMAP to force accounts synchronization."
(interactive)
- (signal-process (get-buffer-process (current-buffer)) 'SIGUSR1))
+ (signal-process (get-buffer-process (offlineimap-get-buffer) 'SIGUSR1))
(define-derived-mode offlineimap-mode comint-mode "OfflineIMAP"
"A major mode for OfflineIMAP interaction."