[gnus git] branch master updated: m0-3-147-g527f567 =1= Use `gnus-buffer-live-p' instead of `buffer-live-p'.
Lars Magne Ingebrigtsen <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 527f5670327f576e1eb9f6ae71c68bf962389af5 (commit)
from e7b803c97811f4a42e3b0a4e1bfac7b8d0e43e88 (commit)
- Log -----------------------------------------------------------------
commit 527f5670327f576e1eb9f6ae71c68bf962389af5
Author: Lars Magne Ingebrigtsen <[email protected]>
Date: Thu Apr 12 20:14:29 2012 +0200
Use `gnus-buffer-live-p' instead of `buffer-live-p'.
This makes the tests with `gnus-group-buffer', a string, work.
diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el
index b777436..7fc6591 100644
--- a/lisp/gnus-group.el
+++ b/lisp/gnus-group.el
@@ -2329,7 +2329,7 @@ Return the name of the group if selection was successful."
parameters)))
gnus-newsrc-hashtb)
(push method gnus-ephemeral-servers)
- (when (buffer-live-p gnus-group-buffer)
+ (when (gnus-buffer-live-p gnus-group-buffer)
(set-buffer gnus-group-buffer))
(unless (gnus-check-server method)
(error "Unable to contact server: %s" (gnus-status-message method)))
diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index a646afb..7b14703 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -5683,7 +5683,7 @@ If SELECT-ARTICLES, only select those articles from GROUP."
;; Init the dependencies hash table.
(setq gnus-newsgroup-dependencies
(gnus-make-hashtable (length articles)))
- (if (buffer-live-p gnus-group-buffer)
+ (if (gnus-buffer-live-p gnus-group-buffer)
(gnus-set-global-variables)
(set-default 'gnus-newsgroup-name gnus-newsgroup-name))
;; Retrieve the headers and read them in.
@@ -7283,7 +7283,7 @@ If FORCE (the prefix), also save the .newsrc file(s)."
(gnus-kill-buffer buf)))
(setq gnus-current-select-method gnus-select-method)
- (when (buffer-live-p gnus-group-buffer)
+ (when (gnus-buffer-live-p gnus-group-buffer)
(set-buffer gnus-group-buffer))
(if quit-config
(gnus-handle-ephemeral-exit quit-config)
@@ -7363,7 +7363,7 @@ If FORCE (the prefix), also save the .newsrc file(s)."
"Handle movement when leaving an ephemeral group.
The state which existed when entering the ephemeral is reset."
(if (not (buffer-live-p (car quit-config)))
- (when (buffer-live-p gnus-group-buffer)
+ (when (gnus-buffer-live-p gnus-group-buffer)
(gnus-configure-windows 'group 'force))
(set-buffer (car quit-config))
(unless (eq (cdr quit-config) 'group)
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/gnus-group.el | 2 +-
lisp/gnus-sum.el | 6 +++---
2 files changed, 4 insertions(+), 4 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project