From d79b7751137b0e173e71bd093443c79ceb9cd26c Mon Sep 17 00:00:00 2001 From: yamaoka Date: Thu, 1 May 2003 16:17:29 +0000 Subject: [PATCH] T-gnus 6.15.24 revision 00. --- ChangeLog | 8 ++++++++ README.T-gnus | 2 +- README.semi | 2 +- README.semi.ja | 2 +- contrib/ChangeLog | 5 +++++ contrib/gpg.el | 9 +++++---- etc/gnus-tut.txt | 4 ++-- lisp/ChangeLog | 21 ++++++++++++++++++++- lisp/dgnushack.el | 4 ++-- lisp/gnus-demon.el | 2 +- lisp/gnus-diary.el | 2 +- lisp/gnus-dired.el | 2 +- lisp/gnus-gl.el | 2 +- lisp/gnus-kill.el | 2 +- lisp/gnus-registry.el | 21 ++++++++++++++------- lisp/gnus-undo.el | 2 +- lisp/gnus-uu.el | 2 +- lisp/gnus-vers.el | 4 ++-- lisp/ietf-drums.el | 2 +- lisp/mm-extern.el | 2 +- lisp/mm-view.el | 2 +- lisp/nndb.el | 2 +- lisp/nndiary.el | 2 +- lisp/nndoc.el | 2 +- lisp/nnkiboze.el | 2 +- lisp/nnmbox.el | 2 +- lisp/nnmh.el | 2 +- lisp/nnml.el | 2 +- lisp/nnwarchive.el | 2 +- lisp/qp.el | 2 +- lisp/rfc2047.el | 2 +- lisp/rfc2231.el | 2 +- texi/ChangeLog | 5 +++++ texi/gnus-ja.texi | 7 +++++++ texi/gnus.texi | 7 +++++++ 35 files changed, 101 insertions(+), 42 deletions(-) diff --git a/ChangeLog b/ChangeLog index 036a33f..aacb375 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,13 @@ 2003-05-01 Katsumi Yamaoka + * lisp/gnus-vers.el: T-gnus 6.15.24 revision 00. + +2003-05-01 Jesper Harder + + * etc/gnus-tut.txt (http): Update. + +2003-05-01 Katsumi Yamaoka + * lisp/gnus-vers.el: T-gnus 6.15.23 revision 00. 2003-05-01 Simon Josefsson diff --git a/README.T-gnus b/README.T-gnus index 4289e22..8051cb0 100644 --- a/README.T-gnus +++ b/README.T-gnus @@ -33,5 +33,5 @@ NEWS: * T-gnus 6.15 - this is based on Oort Gnus. - The latest T-gnus is T-gnus 6.15.23 (based on Oort Gnus 0.23). It + The latest T-gnus is T-gnus 6.15.24 (based on Oort Gnus 0.24). It requires SEMI 1.14, FLIM 1.14, and APEL 10.0 or later. diff --git a/README.semi b/README.semi index 8002132..3b4e80b 100644 --- a/README.semi +++ b/README.semi @@ -4,7 +4,7 @@ What is T-gnus? =============== T-gnus is an improvement of Gnus with SEMI's MIME feature. T-gnus -6.15 is based on Oort Gnus v0.23. SEMI may stand for "SEMI is Emacs +6.15 is based on Oort Gnus v0.24. SEMI may stand for "SEMI is Emacs MIME Interface" and is developped to provide an easy interfaces for users to handle MIME message structures. For further information, refer to REASME.en of SEMI. diff --git a/README.semi.ja b/README.semi.ja index ed3cb41..11d5455 100644 --- a/README.semi.ja +++ b/README.semi.ja @@ -4,7 +4,7 @@ T-gnus とは？ ============= T-gnus は、SEMI を利用して Gnus に MIME 機能を追加するものです。 -T-gnus 6.15 は Oort Gnus v0.23 をベースにしています。SEMI は Emacs で +T-gnus 6.15 は Oort Gnus v0.24 をベースにしています。SEMI は Emacs で MIME を使えるようにするもので、MIME message の構文の構造と利用者の間を つなぐインターフェースを提供します。詳しくは、SEMI の README.en を参照 してください。 diff --git a/contrib/ChangeLog b/contrib/ChangeLog index d18affe..e290ca9 100644 --- a/contrib/ChangeLog +++ b/contrib/ChangeLog @@ -1,3 +1,8 @@ +2003-05-01 Vasily Korytov + + * gpg.el (gpg-passphrase-forget): Check that gpg-passphrase is + set. + 2003-04-17 Steve Youngs * hashcash.el (hashcash-point-at-bol): Move the fbound test diff --git a/contrib/gpg.el b/contrib/gpg.el index a747594..9362788 100644 --- a/contrib/gpg.el +++ b/contrib/gpg.el @@ -798,10 +798,11 @@ evaluates BODY, like `progn'. If BODY evaluates to `nil' (or (defun gpg-passphrase-forget () "Forget stored passphrase." (interactive) - (cancel-timer gpg-passphrase-timer) - (setq gpg-passphrase-timer nil) - (gpg-passphrase-clear-string gpg-passphrase) - (setq gpg-passphrase nil)) + (when gpg-passphrase + (cancel-timer gpg-passphrase-timer) + (setq gpg-passphrase-timer nil) + (gpg-passphrase-clear-string gpg-passphrase) + (setq gpg-passphrase nil))) (defun gpg-passphrase-store (passphrase) "Store PASSPHRASE in cache. diff --git a/etc/gnus-tut.txt b/etc/gnus-tut.txt index cefd9b5..9149610 100644 --- a/etc/gnus-tut.txt +++ b/etc/gnus-tut.txt @@ -195,7 +195,7 @@ which are both faster and more accurated. There is absolutely no chance, whatsoever, of getting Gnus to work with Emacs 18. It won't even work on Emacsen older than Emacs -20.3/XEmacs 20.4. Upgrade your Emacs or die. +20.7/XEmacs 21.1. Upgrade your Emacs or die. From lars Thu Feb 23 23:20:38 1995 @@ -569,7 +569,7 @@ Frequently Asked Questions with Answers 1.5. Which version of Emacs do I need? Gnus 5.10.0 requires an Emacs version that is greater than or equal - to Emacs 20.3 or XEmacs 20.1. + to Emacs 20.7 or XEmacs 21.1. 1.6. How do I run Gnus on both Emacs and XEmacs? diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a2d14dc..e979c6b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,24 @@ 2003-05-01 Lars Magne Ingebrigtsen + * gnus.el: Oort Gnus v0.24 is released. + +2003-05-01 Lars Magne Ingebrigtsen + + * dgnushack.el (when): Check whether defadvice is fbound. + +2003-05-01 Teodor Zlatanov + + * gnus-registry.el (gnus-registry-unregistered-group-regex): new variable + (gnus-registry-register-message-ids): use it + +2003-05-01 Lars Magne Ingebrigtsen + + * gnus.el (gnus-version-number): Bump. + + * gnus.el: Update copyright for several files. + +2003-05-01 Lars Magne Ingebrigtsen + * gnus.el: Oort Gnus v0.23 is released. 2003-05-01 Lars Magne Ingebrigtsen @@ -103,7 +122,7 @@ Take care of some differences between XEmacs 21.1 and newer versions of XEmacs. -2003-04-30 Teodor Zlatanov +2003-04-30 Teodor Zlatanov * gnus-registry.el (gnus-registry-split-fancy-with-parent): added diagnostic message diff --git a/lisp/dgnushack.el b/lisp/dgnushack.el index 21f1953..505f844 100644 --- a/lisp/dgnushack.el +++ b/lisp/dgnushack.el @@ -1,5 +1,5 @@ ;;; dgnushack.el --- a hack to set the load path for byte-compiling -;; Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002 +;; Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen @@ -473,7 +473,7 @@ Try to re-configure with --with-addpath=FLIM_PATH and run make again. (autoload 'custom-declare-face "cus-face" nil t) (autoload 'cl-compile-time-init "cl-macs" nil t) (autoload 'defadvice "advice" nil nil 'macro)) - (when (eq emacs-minor-version 4) + (unless (fboundp 'defadvice) (autoload 'defadvice "advice" nil nil 'macro)) (autoload 'Info-directory "info" nil t) (autoload 'Info-menu "info" nil t) diff --git a/lisp/gnus-demon.el b/lisp/gnus-demon.el index 2c73b37..3d943b6 100644 --- a/lisp/gnus-demon.el +++ b/lisp/gnus-demon.el @@ -1,6 +1,6 @@ ;;; gnus-demon.el --- daemonic Gnus behaviour -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2003 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen diff --git a/lisp/gnus-diary.el b/lisp/gnus-diary.el index 569aec8..dafb8c3 100644 --- a/lisp/gnus-diary.el +++ b/lisp/gnus-diary.el @@ -1,6 +1,6 @@ ;;; gnus-diary.el --- Wrapper around the NNDiary Gnus backend -;; Copyright (c) 2001, 2002 Free Software Foundation, Inc. +;; Copyright (c) 2001, 2002, 2003 Free Software Foundation, Inc. ;; Copyright (C) 1999, 2000, 2001 Didier Verna. ;; Author: Didier Verna diff --git a/lisp/gnus-dired.el b/lisp/gnus-dired.el index a2cbb38..cf54427 100644 --- a/lisp/gnus-dired.el +++ b/lisp/gnus-dired.el @@ -1,6 +1,6 @@ ;;; gnus-dired.el --- utility functions where gnus and dired meet -;; Copyright (C) 1996, 1997, 1998, 1999, 2001, 2002 +;; Copyright (C) 1996, 1997, 1998, 1999, 2001, 2002, 2003 ;; Free Software Foundation, Inc. ;; Authors: Benjamin Rutt , diff --git a/lisp/gnus-gl.el b/lisp/gnus-gl.el index c176ffd..7a989e6 100644 --- a/lisp/gnus-gl.el +++ b/lisp/gnus-gl.el @@ -1,6 +1,6 @@ ;;; gnus-gl.el --- an interface to GroupLens for Gnus -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003 ;; Free Software Foundation, Inc. ;; Author: Brad Miller diff --git a/lisp/gnus-kill.el b/lisp/gnus-kill.el index b7329bd..cf95f9f 100644 --- a/lisp/gnus-kill.el +++ b/lisp/gnus-kill.el @@ -1,5 +1,5 @@ ;;; gnus-kill.el --- kill commands for Gnus -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2003 ;; Free Software Foundation, Inc. ;; Author: Masanobu UMEDA diff --git a/lisp/gnus-registry.el b/lisp/gnus-registry.el index 7d80120..324155d 100644 --- a/lisp/gnus-registry.el +++ b/lisp/gnus-registry.el @@ -49,6 +49,11 @@ The group names are matched, they don't have to be fully qualified." :group 'gnus-registry :type '(repeat string)) +(defcustom gnus-registry-unregistered-group-regex "^nntp" + "Group name regex that gnus-registry-register-message-ids won't process." + :group 'gnus-registry + :type 'regexp) + ;; Function(s) missing in Emacs 20 (when (memq nil (mapcar 'fboundp '(puthash))) (require 'cl) @@ -151,13 +156,15 @@ See the Info node `(gnus)Fancy Mail Splitting' for more details." (defun gnus-registry-register-message-ids () "Register the Message-ID of every article in the group" - (dolist (article gnus-newsgroup-articles) - (let ((id (gnus-registry-fetch-message-id-fast article))) - (unless (gnus-registry-fetch-group id) - (gnus-message 9 "Registry: Registering article %d with group %s" - article gnus-newsgroup-name) - (gnus-registry-add-group (gnus-registry-fetch-message-id-fast article) - gnus-newsgroup-name))))) + (unless (and gnus-registry-unregistered-group-regex + (string-match gnus-registry-unregistered-group-regex gnus-newsgroup-name)) + (dolist (article gnus-newsgroup-articles) + (let ((id (gnus-registry-fetch-message-id-fast article))) + (unless (gnus-registry-fetch-group id) + (gnus-message 9 "Registry: Registering article %d with group %s" + article gnus-newsgroup-name) + (gnus-registry-add-group (gnus-registry-fetch-message-id-fast article) + gnus-newsgroup-name)))))) (defun gnus-registry-fetch-message-id-fast (article) "Fetch the Message-ID quickly, using the internal gnus-data-list function" diff --git a/lisp/gnus-undo.el b/lisp/gnus-undo.el index cbd506a..f022926 100644 --- a/lisp/gnus-undo.el +++ b/lisp/gnus-undo.el @@ -1,6 +1,6 @@ ;;; gnus-undo.el --- minor mode for undoing in Gnus -;; Copyright (C) 1996, 1997, 1998, 1999, 2000 +;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2003 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen diff --git a/lisp/gnus-uu.el b/lisp/gnus-uu.el index 500610e..5cb9f64 100644 --- a/lisp/gnus-uu.el +++ b/lisp/gnus-uu.el @@ -1,6 +1,6 @@ ;;; gnus-uu.el --- extract (uu)encoded files in Gnus ;; Copyright (C) 1985, 1986, 1987, 1993, 1994, 1995, 1996, 1997, 1998, 2000, -;; 2001, 2002 Free Software Foundation, Inc. +;; 2001, 2002, 2003 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; Created: 2 Oct 1993 diff --git a/lisp/gnus-vers.el b/lisp/gnus-vers.el index a82b0e3..cdd5bef 100644 --- a/lisp/gnus-vers.el +++ b/lisp/gnus-vers.el @@ -40,10 +40,10 @@ ;; Product information of this gnus. (product-provide 'gnus-vers (product-define "T-gnus" nil - (list 6 15 23 + (list 6 15 24 (string-to-number gnus-revision-number)))) -(defconst gnus-original-version-number "0.23" +(defconst gnus-original-version-number "0.24" "Version number for this version of Gnus.") (provide 'running-pterodactyl-gnus-0_73-or-later) diff --git a/lisp/ietf-drums.el b/lisp/ietf-drums.el index 4725651..aa48c3a 100644 --- a/lisp/ietf-drums.el +++ b/lisp/ietf-drums.el @@ -1,5 +1,5 @@ ;;; ietf-drums.el --- Functions for parsing RFC822bis headers -;; Copyright (C) 1998, 1999, 2000, 2001, 2002 +;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen diff --git a/lisp/mm-extern.el b/lisp/mm-extern.el index 5224a88..2627397 100644 --- a/lisp/mm-extern.el +++ b/lisp/mm-extern.el @@ -1,5 +1,5 @@ ;;; mm-extern.el --- showing message/external-body -;; Copyright (C) 2000, 2001 Free Software Foundation, Inc. +;; Copyright (C) 2000, 2001, 2003 Free Software Foundation, Inc. ;; Author: Shenghuo Zhu ;; Keywords: message external-body diff --git a/lisp/mm-view.el b/lisp/mm-view.el index 71f4458..4fba52b 100644 --- a/lisp/mm-view.el +++ b/lisp/mm-view.el @@ -1,5 +1,5 @@ ;;; mm-view.el --- functions for viewing MIME objects -;; Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc. +;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; This file is part of GNU Emacs. diff --git a/lisp/nndb.el b/lisp/nndb.el index 986f84c..fa5e641 100644 --- a/lisp/nndb.el +++ b/lisp/nndb.el @@ -1,6 +1,6 @@ ;;; nndb.el --- nndb access for Gnus -;; Copyright (C) 1997, 1998, 2000 Free Software Foundation, Inc. +;; Copyright (C) 1997, 1998, 2000, 2003 Free Software Foundation, Inc. ;; Author: Masanobu UMEDA ;; Kai Grossjohann diff --git a/lisp/nndiary.el b/lisp/nndiary.el index cec8ee4..42cb838 100644 --- a/lisp/nndiary.el +++ b/lisp/nndiary.el @@ -1,6 +1,6 @@ ;;; nndiary.el --- A diary backend for Gnus -;; Copyright (C) 1999, 2000, 2001 +;; Copyright (C) 1999, 2000, 2001, 2003 ;; Free Software Foundation, Inc. ;; Author: Didier Verna diff --git a/lisp/nndoc.el b/lisp/nndoc.el index 32bb5d7..73a7582 100644 --- a/lisp/nndoc.el +++ b/lisp/nndoc.el @@ -1,5 +1,5 @@ ;;; nndoc.el --- single file access for Gnus -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen diff --git a/lisp/nnkiboze.el b/lisp/nnkiboze.el index 928165b..07aa565 100644 --- a/lisp/nnkiboze.el +++ b/lisp/nnkiboze.el @@ -1,6 +1,6 @@ ;;; nnkiboze.el --- select virtual news access for Gnus -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2002 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2002, 2003 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen diff --git a/lisp/nnmbox.el b/lisp/nnmbox.el index 1d39aae..7477a31 100644 --- a/lisp/nnmbox.el +++ b/lisp/nnmbox.el @@ -1,6 +1,6 @@ ;;; nnmbox.el --- mail mbox access for Gnus -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen diff --git a/lisp/nnmh.el b/lisp/nnmh.el index d326c06..d4e1483 100644 --- a/lisp/nnmh.el +++ b/lisp/nnmh.el @@ -1,6 +1,6 @@ ;;; nnmh.el --- mhspool access for Gnus -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2003 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen diff --git a/lisp/nnml.el b/lisp/nnml.el index d2f985e..de2daa5 100644 --- a/lisp/nnml.el +++ b/lisp/nnml.el @@ -1,5 +1,5 @@ ;;; nnml.el --- mail spool access for Gnus -;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001 +;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2003 ;; Free Software Foundation, Inc. ;; Author: Simon Josefsson (adding MARKS) diff --git a/lisp/nnwarchive.el b/lisp/nnwarchive.el index ed02567..57f31e9 100644 --- a/lisp/nnwarchive.el +++ b/lisp/nnwarchive.el @@ -1,5 +1,5 @@ ;;; nnwarchive.el --- interfacing with web archives -;; Copyright (C) 1999, 2000 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2003 Free Software Foundation, Inc. ;; Author: Shenghuo Zhu ;; Keywords: news egroups mail-archive diff --git a/lisp/qp.el b/lisp/qp.el index 62d7562..149d30a 100644 --- a/lisp/qp.el +++ b/lisp/qp.el @@ -1,6 +1,6 @@ ;;; qp.el --- Quoted-Printable functions -;; Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc. +;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; Keywords: mail, extensions diff --git a/lisp/rfc2047.el b/lisp/rfc2047.el index aade0dd..81005a9 100644 --- a/lisp/rfc2047.el +++ b/lisp/rfc2047.el @@ -1,5 +1,5 @@ ;;; rfc2047.el --- Functions for encoding and decoding rfc2047 messages -;; Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc. +;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; MORIOKA Tomohiko diff --git a/lisp/rfc2231.el b/lisp/rfc2231.el index 88730a3..f0866f8 100644 --- a/lisp/rfc2231.el +++ b/lisp/rfc2231.el @@ -1,6 +1,6 @@ ;;; rfc2231.el --- Functions for decoding rfc2231 headers -;; Copyright (C) 1998, 1999, 2000, 2002 Free Software Foundation, Inc. +;; Copyright (C) 1998, 1999, 2000, 2002, 2003 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; This file is part of GNU Emacs. diff --git a/texi/ChangeLog b/texi/ChangeLog index e992b52..08041c4 100644 --- a/texi/ChangeLog +++ b/texi/ChangeLog @@ -1,3 +1,8 @@ +2003-05-01 Reiner Steib + + * gnus.texi (Oort Gnus): Add prefix limit feature. + (Oort Gnus): Fix last commit. + 2003-05-01 Lars Magne Ingebrigtsen * gnus.texi (Emacsen): Update. diff --git a/texi/gnus-ja.texi b/texi/gnus-ja.texi index 68b409a..1abd205 100644 --- a/texi/gnus-ja.texi +++ b/texi/gnus-ja.texi @@ -24505,6 +24505,13 @@ It was aliased to @kbd{Y c} (@code{gnus-summary-insert-cached-articles}). The new function filters out other articles. +@item Some limiting commands accept a @kbd{C-u} prefix to negate the match. + +If @kbd{C-u} is used on subject, author or extra headers, i.e., @kbd{/ +s'}, @kbd{/ a}, and @kbd{/ x} +(@code{gnus-summary-limit-to-@{subject,author,extra@}}) respectively, the +result will be to display all articles that do not match the expression. + @item Group names are treated as UTF-8 by default. diff --git a/texi/gnus.texi b/texi/gnus.texi index f1ffc8a..8b027a8 100644 --- a/texi/gnus.texi +++ b/texi/gnus.texi @@ -25161,6 +25161,13 @@ It was aliased to @kbd{Y c} (@code{gnus-summary-insert-cached-articles}). The new function filters out other articles. +@item Some limiting commands accept a @kbd{C-u} prefix to negate the match. + +If @kbd{C-u} is used on subject, author or extra headers, i.e., @kbd{/ +s'}, @kbd{/ a}, and @kbd{/ x} +(@code{gnus-summary-limit-to-@{subject,author,extra@}}) respectively, the +result will be to display all articles that do not match the expression. + @item Group names are treated as UTF-8 by default. -- 1.7.10.4