From: Julien Danjou Date: Wed, 2 Mar 2011 12:34:12 +0000 (+0000) Subject: gnus-art.el (gnus-with-article-buffer): Fix buffer live check. X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~674^2~77 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e1a135a9ebc03eff6a3fea84a7196ecc00cf7d0f;p=emacs.git gnus-art.el (gnus-with-article-buffer): Fix buffer live check. --- diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 4562d544a58..7606d1a44ae 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2011-03-02 Julien Danjou + + * gnus-art.el (gnus-with-article-buffer): Fix buffer live check. + 2011-03-01 Julien Danjou * gnus-art.el (list-identifier): Add list-identifier as a parameter diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index 7469c4445c6..c64138b43d7 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el @@ -1743,7 +1743,7 @@ Initialized from `text-mode-syntax-table.") (put 'gnus-with-article-headers 'edebug-form-spec '(body)) (defmacro gnus-with-article-buffer (&rest forms) - `(when (buffer-live-p gnus-article-buffer) + `(when (buffer-live-p (get-buffer gnus-article-buffer)) (with-current-buffer gnus-article-buffer (let ((inhibit-read-only t)) ,@forms))))