Gnus development mailing list
 help / color / mirror / Atom feed
From: Hanak David <dhanak@inf.bme.hu>
Subject: Suspend + gnus-group-get-new-news
Date: Tue, 24 Jun 2003 17:13:06 +0200	[thread overview]
Message-ID: <m2he6fbjb1.fsf@maui.hanak.hu> (raw)

Hi,

it seems that one of the recent changes to Gnus caused gnus-group-suspend
cease to work.  The change was this:

,----[ Gnus ChangeLog ]
| 2003-06-19  Jesper Harder  <harder@ifa.au.dk>
| 
| 	* nnheader.el (nnheader-init-server-buffer): Add
| 	nntp-server-buffer to gnus-buffers.
| 
| 	* gnus-start.el (gnus-clear-system): Now we don't need to kill
| 	nntp-server-buffer separately.
`----

When I return to a suspended Gnus and press 'g', I get an error message.
The message and the backtrace are the following:

,----
| Debugger entered--Lisp error: (error "Selecting deleted buffer")
|   set-buffer(#<killed buffer>)
|   (save-excursion (set-buffer nntp-server-buffer) (while (setq method ...) (unless ... ...)))
|   (let ((methods ...) method) (setq gnus-have-read-active-file nil) (save-excursion (set-buffer nntp-server-buffer) (while ... ...)))
|   gnus-read-active-file()
|   gnus-group-get-new-news()
`----

The problem could be solved with a patch to gnus-group-suspend:

*** /usr/local/src/emacs-packages/gnus-CVS/lisp/gnus-group.el	2003-06-07 19:55:32.000000000 +0200
--- gnus-group.el	2003-06-24 17:08:25.000000000 +0200
***************
*** 3899,3905 ****
    ;; Kill Gnus buffers except for group mode buffer.
    (let ((group-buf (get-buffer gnus-group-buffer)))
      (mapcar (lambda (buf)
! 	      (unless (or (member buf (list group-buf gnus-dribble-buffer))
  			  (progn
  			    (save-excursion
  			      (set-buffer buf)
--- 3899,3907 ----
    ;; Kill Gnus buffers except for group mode buffer.
    (let ((group-buf (get-buffer gnus-group-buffer)))
      (mapcar (lambda (buf)
! 	      (unless (or (member buf (list group-buf
! 					    gnus-dribble-buffer
! 					    nntp-server-buffer))
  			  (progn
  			    (save-excursion
  			      (set-buffer buf)

David

P.S.: I received the copyright assignment agreement yesterday, I'll soon
post it to FSF.  The bonus stickers (Gnu and Tux flying side by side) are
great!



             reply	other threads:[~2003-06-24 15:13 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-06-24 15:13 Hanak David [this message]
2003-10-17 22:46 ` Lars Magne Ingebrigtsen

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=m2he6fbjb1.fsf@maui.hanak.hu \
    --to=dhanak@inf.bme.hu \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).