From: Jan Vroonhof <vroonhof@math.ethz.ch>
Cc: ding@ifi.uio.no
Subject: gnus-summary-read-document and red 0.26
Date: 04 Sep 1996 12:58:02 +0200 [thread overview]
Message-ID: <bysp8ymts5.fsf@math.ethz.ch> (raw)
[-- Attachment #1: Type: text/plain, Size: 6674 bytes --]
Red Gnus v0.26; nntp 5.0; nnvirtual 1.0; nndoc 1.0; nnfolder 1.0
XEmacs 19.14 [Lucid] (sparc-sun-solaris2.4) of Sat Jun 22 1996 on xemacs
I have found 3 more bugs in the use gnus-summary-read-document
unfortunatly
The most annoying is an old one that is not completely fixed yet when
trying to leave the group created with gnus-summary-read-document:
Here is the back-trace
--- Backtrace ---
Signalling: (wrong-type-argument number-or-marker-p nil)
gnus-list-of-unread-articles("nnvirtual:preprints.cond-mat-19960904T123547")
nnvirtual-update-reads()
nnvirtual-close-group("preprints.cond-mat-19960904T123547" "nnfolder:preprints.cond-mat-19960904T123547")
gnus-close-group("nnfolder:preprints.cond-mat-19960904T123547")
#<compiled-function (from "gnus-sum.elc") (&optional temporary) "...(363)" [gnus-set-global-variables gnus-kill-save-kill-buffer gnus-newsgroup-name group gnus-group-quit-config quit-config major-mode mode buf run-hooks gnus-summary-prepare-exit-hook gnus-single-article-buffer gnus-original-article-buffer buffer get-buffer buffer-name kill-buffer nil gnus-article-current gnus-use-cache gnus-cache-possibly-remove-articles gnus-cache-save-buffers gnus-async-prefetch-remove-group gnus-suppress-duplicates gnus-dup-enter-articles gnus-use-trees gnus-tree-close gnus-summary-update-info gnus-close-group gnus-group-buffer gnus-group-jump-to-group gnus-summary-exit-hook gnus-group-next-unread-group 1 temporary gnus-article-buffer gnus-kill-summary-on-exit gnus-deaden-summary gnus-summary-clear-local-variables bury-buffer gnus-summary-mode gnus-select-method gnus-current-select-method pop-to-buffer gnus-configure-windows force gnus-article-mode gnus-buffer-live-p gnus-summary-buffer] 4 "Exit reading current newsgroup, and then return to group selection mode.\ngnus-exit-group-hook is called with no arguments if that value is non-nil." nil>()
call-interactively(gnus-summary-exit)
--- EOB ---
Somehow Gnus doesn't see that we are in an ephemeral group and calls
gnus-list-of-unread-articles anyway.
2. The second is a bug in generation of the intermediary group names
that gives problem when you ahve read no atricles and mark a few
groups. It is fixed by the following patch:
*** gnus-sum.el.orig Tue Sep 3 05:09:38 1996
--- gnus-sum.el Wed Sep 4 12:22:37 1996
***************
*** 5646,5652 ****
(list (cons 'to-group ogroup))))
article group egroup groups vgroup)
(while (setq article (pop articles))
! (setq group (format "%s-%d" gnus-newsgroup-name gnus-current-article))
(gnus-summary-remove-process-mark article)
(when (gnus-summary-display-article article)
(save-excursion
--- 5646,5652 ----
(list (cons 'to-group ogroup))))
article group egroup groups vgroup)
(while (setq article (pop articles))
! (setq group (format "%s-%d" gnus-newsgroup-name article))
(gnus-summary-remove-process-mark article)
(when (gnus-summary-display-article article)
(save-excursion
Note that the group naming is still different than
gnus-summary-enter-digest-group (why?)
3. The third is simular to 2. It appears when you enter group, don't
read any articles, don't mark any thing and hit M-C-D on an
article. In this case gnus-summary-read-document gives an error
because there is no current article. IMHO it should behave
gnus-summary-enter-digest-group in this case.
As a general question why don't gnus-summary-enter-digest-group en
gnus-summary-read-docment share more code?
------------------ Environment follows ------------------
(setq gnus-default-nntp-server "news")
(setq gnus-local-organization "ETHZ Mathematik")
(setq gnus-group-faq-directory '("/ftp@ftp.uni-paderborn.de:/pub/FAQ/" "/ftp@sunsite.auc.dk:/pub/usenet/" "/ftp@src.doc.ic.ac.uk:/usenet/news-FAQS/" "/ftp@ftp.sunet.se:/pub/usenet/" "/ftp@mirrors.aol.com:/pub/rtfm/usenet/" "/ftp@ftp.seas.gwu.edu:/pub/rtfm/" "/ftp@rtfm.mit.edu:/pub/usenet/" "/ftp@nctuccca.edu.tw:/USENET/FAQ/" "/ftp@hwarang.postech.ac.kr:/pub/usenet/" "/ftp@ftp.hk.super.net:/mirror/faqs/"))
(setq gnus-use-long-file-name t)
(setq gnus-use-adaptive-scoring t)
(setq gnus-use-nocem t)
(setq gnus-summary-prepare-exit-hook '(gnus-summary-expire-articles))
(setq gnus-auto-expirable-newsgroups "tex-nl\\|linux-kernel")
(setq gnus-group-change-level-function 'gnus-topic-change-level)
(setq gnus-fetch-old-headers 'some)
(setq gnus-summary-make-false-root 'dummy)
(setq gnus-summary-thread-gathering-function 'gnus-gather-threads-by-references)
(setq gnus-show-mime t)
(setq gnus-view-pseudo-asynchronously t)
(setq gnus-view-pseudos 'not-confirm)
(setq gnus-thread-sort-functions '(gnus-thread-sort-by-number gnus-thread-sort-by-total-score))
(setq gnus-summary-mode-hook '(gnus-xmas-setup-summary-toolbar gnus-xmas-summary-menu-add))
(setq gnus-summary-exit-hook '(gnus-picons-remove-all gnus-topic-update-topic))
(setq gnus-select-group-hook '(tm-gnus/decode-summary-from-and-subjects))
(setq gnus-parse-headers-hook '(gnus-decode-rfc1522))
(setq gnus-exit-group-hook '(gnus-uu-delete-work-dir gnus-uu-clean-up))
(setq gnus-group-mode-hook '(gnus-topic-mode gnus-xmas-setup-group-toolbar gnus-xmas-group-menu-add))
(setq gnus-group-catchup-group-hook '(gnus-topic-update-topic))
(setq gnus-exit-gnus-hook '((lambda nil
(if
(frame-live-p toolbar-news-frame)
(delete-frame toolbar-news-frame)))))
(setq gnus-show-mime-method 'tm-gnus/preview-article)
(setq gnus-decode-encoded-word-method 'tm-gnus/article-decode-encoded-word)
(setq gnus-article-mode-hook '(gnus-xmas-article-menu-add))
(setq gnus-article-prepare-hook '(tm-gnus/article-reset-variable gnus-article-hide-citation-maybe gnus-smiley-display gnus-article-de-quoted-unreadable gnus-group-display-picons))
(setq gnus-check-new-newsgroups 'ask-server)
(setq gnus-save-newsrc-file nil)
(setq gnus-startup-hook '(#
[nil "ÀÁ!"
[require tm-gnus]
2]
tm-gnus/bbdb-setup))
(setq nnmail-expiry-wait-function '(lambda
(group)
(cond
((string= group "tex-nl")
7)
((string= group "linux-kernel")
4)
(t 6))))
(setq nnmail-spool-file 'procmail)
(setq nnmail-crash-box "~/scratch/Mail/.nnmail-crash-box")
(setq nnmail-procmail-directory "~/scratch/Mail/")
(setq nnmail-treat-duplicates 'delete)
(setq message-deletable-headers '(Message-ID Date))
(setq message-autosave-directory "~/Mail/drafts/")
(setq message-forward-start-separator "
[-- Attachment #2: Type: message/rfc822, Size: 1 bytes --]
reply other threads:[~1996-09-04 10:58 UTC|newest]
Thread overview: [no followups] expand[flat|nested] mbox.gz Atom feed
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=bysp8ymts5.fsf@math.ethz.ch \
--to=vroonhof@math.ethz.ch \
--cc=ding@ifi.uio.no \
/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).