From 887498497d42d6527754913f771648a6a941324b Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 16 Feb 1998 15:11:53 +0000 Subject: [PATCH] Quassia Gnus v0.27. --- lisp/ChangeLog | 64 ++++++++++++++++++++++++++++++++++++++++++++++++++++ lisp/gnus-agent.el | 8 ++++--- lisp/gnus-art.el | 34 +++++++++++++++++----------- lisp/gnus-group.el | 1 + lisp/gnus-salt.el | 3 +-- lisp/gnus-score.el | 13 ++++++++--- lisp/gnus-srvr.el | 4 +++- lisp/gnus-start.el | 12 ++++++---- lisp/gnus-sum.el | 30 ++++++++++++------------ lisp/gnus-xmas.el | 13 +++++++---- lisp/gnus.el | 3 ++- lisp/message.el | 6 ++--- lisp/nntp.el | 14 +++++++++--- texi/gnus.texi | 28 +++++++++++++++++------ texi/message.texi | 6 ++--- 15 files changed, 176 insertions(+), 63 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 27aa158..2ec832d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,67 @@ +Sun Feb 15 19:50:10 1998 Lars Magne Ingebrigtsen + + * gnus.el: Quassia Gnus v0.27 is released. + +Sun Feb 15 19:41:14 1998 Lars Magne Ingebrigtsen + + * gnus.el (gnus-ephemeral-servers): New variable. + * gnus-srvr.el (gnus-server-prepare): Use it. + * gnus-group.el (gnus-group-read-ephemeral-group): Ditto. + +Sun Feb 15 19:35:11 1998 Kurt Swanson + + * gnus-art.el (gnus-article-read-summary-keys): Go to top on + some. + +Sun Feb 15 19:26:21 1998 SeokChan LEE + + * message.el (message-ignored-supersedes-headers): Fix. + +Sun Feb 15 18:39:15 1998 Lars Magne Ingebrigtsen + + * gnus-salt.el (gnus-tree-close): Start killing buffer again. + + * gnus-sum.el (gnus-mark-article-as-read): Return t. + + * gnus-art.el (gnus-article-edit-mode): Run text mode hook. + +Sun Feb 15 17:31:19 1998 Roland Roberts + + * gnus-sum.el (gnus-nov-parse-line): Would bug out on bogus + References headers. + +Sun Feb 15 14:23:51 1998 Lars Magne Ingebrigtsen + + * gnus-art.el (gnus-article-current-summary): New variable. + (gnus-article-mode): Make it local. + + * gnus-score.el (gnus-summary-increase-score): Find the right + global score file. + + * gnus-start.el (gnus-setup-news): Don't find new newsgroups + unless plugged. + + * message.el (message-mode): Set font-lock things before running + mode hook. + + * gnus-agent.el (gnus-agent-group-path): Respect long file names. + +Sat Feb 14 21:31:25 1998 Lars Magne Ingebrigtsen + + * gnus-sum.el (gnus-summary-goto-last-article): Force jumping to + articles outside limit. + + * gnus-agent.el (gnus-agent-toggle-plugged): un/plug before hook. + +Sat Feb 14 21:08:03 1998 Kim-Minh Kaplan + + * gnus-xmas.el (gnus-xmas-article-display-xface): t t would make + faces disappear. + +Sat Feb 14 20:52:34 1998 Lars Magne Ingebrigtsen + + * nntp.el (nntp-netrc-file): New variable. + Sat Feb 14 19:28:01 1998 Lars Magne Ingebrigtsen * gnus.el: Quassia Gnus v0.26 is released. diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el index 35fd39c..f6ce18c 100644 --- a/lisp/gnus-agent.el +++ b/lisp/gnus-agent.el @@ -236,6 +236,7 @@ (defun gnus-agent-toggle-plugged (plugged) "Toggle whether Gnus is unplugged or not." (interactive (list (not gnus-plugged))) + (setq gnus-plugged plugged) (if plugged (progn (gnus-run-hooks 'gnus-agent-plugged-hook) @@ -243,7 +244,6 @@ (gnus-agent-close-connections) (gnus-run-hooks 'gnus-agent-unplugged-hook) (setcar (cdr gnus-agent-mode-status) " Unplugged")) - (setq gnus-plugged plugged) (set-buffer-modified-p t)) (defun gnus-agent-close-connections () @@ -479,8 +479,10 @@ the actual number of articles toggled is returned." (defun gnus-agent-group-path (group) "Translate GROUP into a path." - (nnheader-translate-file-chars - (nnheader-replace-chars-in-string group ?. ?/))) + (if nnmail-use-long-file-names + group + (nnheader-translate-file-chars + (nnheader-replace-chars-in-string group ?. ?/)))) diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index f4f5148..7c36420 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -534,6 +534,7 @@ displayed by the first non-nil matching CONTENT face." ;;; Internal variables (defvar article-lapsed-timer nil) +(defvar gnus-article-current-summary nil) (defvar gnus-article-mode-syntax-table (let ((table (copy-syntax-table text-mode-syntax-table))) @@ -547,8 +548,8 @@ Initialized from `text-mode-syntax-table.") (defvar gnus-save-article-buffer nil) (defvar gnus-article-mode-line-format-alist - (nconc '((?w (gnus-article-wash-status) ?s)) - gnus-summary-mode-line-format-alist)) + (nconc '((?w (gnus-article-wash-status) ?s)) + gnus-summary-mode-line-format-alist)) (defvar gnus-number-of-articles-to-be-saved nil) @@ -1552,7 +1553,7 @@ This format is defined by the `gnus-article-time-format' variable." (gnus-number-of-articles-to-be-saved (when (eq gnus-prompt-before-saving t) num))) ; Magic - (set-buffer gnus-summary-buffer) + (set-buffer gnus-article-current-summary) (funcall gnus-default-article-saver filename))))) (defun gnus-read-save-file-name (prompt &optional filename @@ -1959,6 +1960,7 @@ commands: (set (make-local-variable 'page-delimiter) gnus-page-delimiter) (set (make-local-variable 'gnus-page-broken) nil) (set (make-local-variable 'gnus-button-marker-list) nil) + (set (make-local-variable 'gnus-article-current-summary) nil) (gnus-set-default-directory) (buffer-disable-undo (current-buffer)) (setq buffer-read-only t) @@ -2318,7 +2320,7 @@ Argument LINES specifies lines to be scrolled down." (let ((obuf (current-buffer)) (owin (current-window-configuration)) func) - (switch-to-buffer gnus-summary-buffer 'norecord) + (switch-to-buffer gnus-article-current-summary 'norecord) (setq func (lookup-key (current-local-map) (this-command-keys))) (call-interactively func) (set-buffer obuf) @@ -2329,7 +2331,7 @@ Argument LINES specifies lines to be scrolled down." "Execute the last keystroke in the summary buffer." (interactive) (let (func) - (pop-to-buffer gnus-summary-buffer 'norecord) + (pop-to-buffer gnus-article-current-summary 'norecord) (setq func (lookup-key (current-local-map) (this-command-keys))) (call-interactively func))) @@ -2344,9 +2346,11 @@ Argument LINES specifies lines to be scrolled down." '("A\r")) (nosave-in-article '("\C-d")) + (up-to-top + '("n" "Gn" "p" "Gp")) keys) (save-excursion - (set-buffer gnus-summary-buffer) + (set-buffer gnus-article-current-summary) (let (gnus-pick-mode) (push (or key last-command-event) unread-command-events) (setq keys (read-key-sequence nil)))) @@ -2357,14 +2361,14 @@ Argument LINES specifies lines to be scrolled down." (member keys nosave-in-article)) (let (func) (save-window-excursion - (pop-to-buffer gnus-summary-buffer 'norecord) + (pop-to-buffer gnus-article-current-summary 'norecord) ;; We disable the pick minor mode commands. (let (gnus-pick-mode) (setq func (lookup-key (current-local-map) keys)))) (if (not func) (ding) (unless (member keys nosave-in-article) - (set-buffer gnus-summary-buffer)) + (set-buffer gnus-article-current-summary)) (call-interactively func)) (when (member keys nosave-but-article) (pop-to-buffer gnus-article-buffer 'norecord))) @@ -2374,8 +2378,8 @@ Argument LINES specifies lines to be scrolled down." (opoint (point)) func in-buffer) (if not-restore-window - (pop-to-buffer gnus-summary-buffer 'norecord) - (switch-to-buffer gnus-summary-buffer 'norecord)) + (pop-to-buffer gnus-article-current-summary 'norecord) + (switch-to-buffer gnus-article-current-summary 'norecord)) (setq in-buffer (current-buffer)) ;; We disable the pick minor mode commands. (if (setq func (let (gnus-pick-mode) @@ -2386,7 +2390,9 @@ Argument LINES specifies lines to be scrolled down." (set-buffer obuf) (unless not-restore-window (set-window-configuration owin)) - (set-window-point (get-buffer-window (current-buffer)) opoint)))))) + (unless (member keys up-to-top) + (set-window-point (get-buffer-window (current-buffer)) + opoint))))))) (defun gnus-article-hide (&optional arg force) "Hide all the gruft in the current article. @@ -2516,10 +2522,12 @@ If given a prefix, show the hidden text instead." ;; It was a pseudo. (t article))) + ;; Associate this article with the current summary buffer. + (setq gnus-article-current-summary gnus-summary-buffer) + ;; Take the article from the original article buffer ;; and place it in the buffer it's supposed to be in. (when (and (get-buffer gnus-article-buffer) - ;;(numberp article) (equal (buffer-name (current-buffer)) (buffer-name (get-buffer gnus-article-buffer)))) (save-excursion @@ -2586,7 +2594,7 @@ This is an extended text-mode. (setq buffer-read-only nil) (buffer-enable-undo) (widen) - (gnus-run-hooks 'text-mode 'gnus-article-edit-mode-hook)) + (gnus-run-hooks 'text-mode-hook 'gnus-article-edit-mode-hook)) (defun gnus-article-edit (&optional force) "Edit the current article. diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el index 6597ef1..98f59c0 100644 --- a/lisp/gnus-group.el +++ b/lisp/gnus-group.el @@ -1600,6 +1600,7 @@ Return the name of the group is selection was successful." (cons gnus-summary-buffer gnus-current-window-configuration)))))) gnus-newsrc-hashtb) + (push method gnus-ephemeral-servers) (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-salt.el b/lisp/gnus-salt.el index 1f546e2..8c201ba 100644 --- a/lisp/gnus-salt.el +++ b/lisp/gnus-salt.el @@ -796,8 +796,7 @@ Two predefined functions are available: (gnus-get-tree-buffer)) (defun gnus-tree-close (group) - ;(gnus-kill-buffer gnus-tree-buffer) - ) + (gnus-kill-buffer gnus-tree-buffer)) (defun gnus-highlight-selected-tree (article) "Highlight the selected article in the tree." diff --git a/lisp/gnus-score.el b/lisp/gnus-score.el index 5128361..bab7f9e 100644 --- a/lisp/gnus-score.el +++ b/lisp/gnus-score.el @@ -633,7 +633,15 @@ used as score." (save-excursion (set-buffer gnus-summary-buffer) (gnus-score-load-file - (gnus-score-file-name "all")))) + ;; This is a kludge; yes... + (cond + ((eq gnus-score-find-score-files-function + 'gnus-score-find-hierarchical) + (gnus-score-file-name "")) + ((eq gnus-score-find-score-files-function 'gnus-score-find-single) + current-score-file) + (t + (gnus-score-file-name "all")))))) (gnus-summary-score-entry (nth 1 entry) ; Header @@ -2691,8 +2699,7 @@ The list is determined from the variable gnus-score-file-alist." ((or (null newsgroup) (string-equal newsgroup "")) ;; The global score file is placed at top of the directory. - (expand-file-name - suffix gnus-kill-files-directory)) + (expand-file-name suffix gnus-kill-files-directory)) ((gnus-use-long-file-name 'not-score) ;; Append ".SCORE" to newsgroup name. (expand-file-name (concat (gnus-newsgroup-savable-name newsgroup) diff --git a/lisp/gnus-srvr.el b/lisp/gnus-srvr.el index 3fda74f..32b2ade 100644 --- a/lisp/gnus-srvr.el +++ b/lisp/gnus-srvr.el @@ -221,7 +221,9 @@ The following commands are available: ;; Then we insert the list of servers that have been opened in ;; this session. (while opened - (unless (member (caar opened) done) + (when (and (not (member (caar opened) done)) + ;; Just ignore ephemeral servers. + (not (member (caar opened) gnus-ephemeral-servers))) (push (caar opened) done) (gnus-server-insert-server-line (setq op-ser (format "%s:%s" (caaar opened) (nth 1 (caar opened)))) diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el index 8ec7c5b..66bb153 100644 --- a/lisp/gnus-start.el +++ b/lisp/gnus-start.el @@ -80,18 +80,18 @@ saved will be used." :type '(choice directory (const nil))) (defcustom gnus-check-new-newsgroups 'ask-server - "*Non-nil means that Gnus will run gnus-find-new-newsgroups at startup. + "*Non-nil means that Gnus will run `gnus-find-new-newsgroups' at startup. This normally finds new newsgroups by comparing the active groups the servers have already reported with those Gnus already knows, either alive or killed. -When any of the following are true, gnus-find-new-newsgroups will instead +When any of the following are true, `gnus-find-new-newsgroups' will instead ask the servers (primary, secondary, and archive servers) to list new groups since the last time it checked: 1. This variable is `ask-server'. 2. This variable is a list of select methods (see below). 3. `gnus-read-active-file' is nil or `some'. - 4. A prefix argument is given to gnus-find-new-newsgroups interactively. + 4. A prefix argument is given to `gnus-find-new-newsgroups' interactively. Thus, if this variable is `ask-server' or a list of select methods or `gnus-read-active-file' is nil or `some', then the killed list is no @@ -608,7 +608,8 @@ the first newsgroup." gnus-newsgroup-data nil gnus-newsgroup-unreads nil nnoo-state-alist nil - gnus-current-select-method nil) + gnus-current-select-method nil + gnus-ephemeral-servers nil) (gnus-shutdown 'gnus) ;; Kill the startup file. (and gnus-current-startup-file @@ -905,7 +906,8 @@ If LEVEL is non-nil, the news will be set up at level LEVEL." ;; Find new newsgroups and treat them. (when (and init gnus-check-new-newsgroups (not level) (gnus-check-server gnus-select-method) - (not gnus-slave)) + (not gnus-slave) + gnus-plugged) (gnus-find-new-newsgroups)) ;; We might read in new NoCeM messages here. diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index 56b243f..bb862e0 100644 --- a/lisp/gnus-sum.el +++ b/lisp/gnus-sum.el @@ -4497,7 +4497,7 @@ The resulting hash table is returned, or nil if no Xrefs were found." (setq ref (buffer-substring (1+ (point)) - (search-backward "<" beg t))) + (or (search-backward "<" beg t) beg))) (setq ref nil)) (goto-char beg)) (gnus-nov-field)) ; refs @@ -5863,7 +5863,7 @@ If ALL-HEADERS is non-nil, no header lines are hidden." (interactive) (prog1 (when gnus-last-article - (gnus-summary-goto-article gnus-last-article)) + (gnus-summary-goto-article gnus-last-article nil t)) (gnus-summary-position-point))) (defun gnus-summary-pop-article (number) @@ -7211,13 +7211,14 @@ This will be the case if the article has both been mailed and posted." ;; through the expiry process. (gnus-message 6 "Expiring articles...") ;; The list of articles that weren't expired is returned. - (if expiry-wait - (let ((nnmail-expiry-wait-function nil) - (nnmail-expiry-wait expiry-wait)) - (setq es (gnus-request-expire-articles - expirable gnus-newsgroup-name))) - (setq es (gnus-request-expire-articles - expirable gnus-newsgroup-name))) + (save-excursion + (if expiry-wait + (let ((nnmail-expiry-wait-function nil) + (nnmail-expiry-wait expiry-wait)) + (setq es (gnus-request-expire-articles + expirable gnus-newsgroup-name))) + (setq es (gnus-request-expire-articles + expirable gnus-newsgroup-name)))) (unless total (setq gnus-newsgroup-expirable es)) ;; We go through the old list of expirable, and mark all @@ -7237,10 +7238,10 @@ This will be the case if the article has both been mailed and posted." This means that *all* articles that are marked as expirable will be deleted forever, right now." (interactive) - (or gnus-expert-user - (gnus-yes-or-no-p - "Are you really, really, really sure you want to delete all these messages? ") - (error "Phew!")) + (unless gnus-expert-user + (gnus-yes-or-no-p + "Are you really, really, really sure you want to delete all these messages? ") + (error "Phew!")) (gnus-summary-expire-articles t)) ;; Suggested by Jack Vinson . @@ -7773,7 +7774,8 @@ marked." (push (cons article mark) gnus-newsgroup-reads) ;; Possibly remove from cache, if that is used. (when gnus-use-cache - (gnus-cache-enter-remove-article article)))) + (gnus-cache-enter-remove-article article)) + t)) (defun gnus-mark-article-as-unread (article &optional mark) "Enter ARTICLE in the pertinent lists and remove it from others." diff --git a/lisp/gnus-xmas.el b/lisp/gnus-xmas.el index 28e8126..7f7917f 100644 --- a/lisp/gnus-xmas.el +++ b/lisp/gnus-xmas.el @@ -746,12 +746,15 @@ XEmacs compatibility workaround." (make-glyph (vector 'xpm :data (buffer-string)))))) (t - (make-glyph [nothing]))))) + (make-glyph [nothing])))) + (ext (make-extent (progn + (goto-char (point-min)) + (re-search-forward "^From:" nil t) + (point)) + (1+ (point))))) (set-glyph-face xface-glyph 'gnus-x-face) - (goto-char (point-min)) - (re-search-forward "^From:" nil t) - (set-extent-begin-glyph - (make-extent (point) (1+ (point))) xface-glyph)))) + (set-extent-begin-glyph ext xface-glyph) + (set-extent-property ext 'duplicable t)))) ;;(defvar gnus-xmas-pointer-glyph ;; (progn diff --git a/lisp/gnus.el b/lisp/gnus.el index 5427ecd..7bbeef9 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -246,7 +246,7 @@ is restarted, and sometimes reloaded." :link '(custom-manual "(gnus)Exiting Gnus") :group 'gnus) -(defconst gnus-version-number "0.26" +(defconst gnus-version-number "0.27" "Version number for this version of Gnus.") (defconst gnus-version (format "Quassia Gnus v%s" gnus-version-number) @@ -1372,6 +1372,7 @@ want." (defvar gnus-group-get-parameter-function 'gnus-group-get-parameter) (defvar gnus-original-article-buffer " *Original Article*") (defvar gnus-newsgroup-name nil) +(defvar gnus-ephemeral-servers nil) (defvar gnus-agent nil "Whether we want to use the Gnus agent or not.") diff --git a/lisp/message.el b/lisp/message.el index 3ea01e9..57a39bb 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -210,7 +210,7 @@ included. Organization, Lines and X-Mailer are optional." :group 'message-headers :type 'regexp) -(defcustom message-ignored-supersedes-headers "^Path:\\|^Date\\|^NNTP-Posting-Host:\\|^Xref:\\|^Lines:\\|^Received:\\|^X-From-Line:\\|X-Trace:\\|X-Complaints-To:\\|Return-Path:\\|^Supersedes:" +(defcustom message-ignored-supersedes-headers "^Path:\\|^Date\\|^NNTP-Posting-Host:\\|^Xref:\\|^Lines:\\|^Received:\\|^X-From-Line:\\|^X-Trace:\\|^X-Complaints-To:\\|Return-Path:\\|^Supersedes:" "*Header lines matching this regexp will be deleted before posting. It's best to delete old Path and Date headers before posting to avoid any confusion." @@ -1316,10 +1316,10 @@ C-c C-r message-caesar-buffer-body (rot13 the message body)." (mail-abbrevs-setup) (funcall (intern "mail-aliases-setup")))) (message-set-auto-save-file-name) - (gnus-run-hooks 'text-mode-hook 'message-mode-hook) (unless (string-match "XEmacs" emacs-version) (set (make-local-variable 'font-lock-defaults) - '(message-font-lock-keywords t)))) + '(message-font-lock-keywords t))) + (gnus-run-hooks 'text-mode-hook 'message-mode-hook)) diff --git a/lisp/nntp.el b/lisp/nntp.el index ec0aaa0..a138b00 100644 --- a/lisp/nntp.el +++ b/lisp/nntp.el @@ -154,7 +154,8 @@ If can be used to set up a server remotely, for instance. Say you have an account at the machine \"other.machine\". This machine has access to an NNTP server that you can't access locally. You could then use this hook to rsh to the remote machine and start a proxy NNTP -server there that you can connect to. See also `nntp-open-connection-function'") +server there that you can connect to. See also +`nntp-open-connection-function'") (defvoo nntp-warn-about-losing-connection t "*If non-nil, beep when a server closes connection.") @@ -163,7 +164,10 @@ server there that you can connect to. See also `nntp-open-connection-function'" "*Coding system to read from NNTP.") (defvoo nntp-coding-system-for-write 'binary - "*Coding system to write to NNTP.") + "*Coding system to write to NNTP.") + +(defvar nntp-netrc-file "~/.netrc" + "*The location of the file containing authinfo information.") @@ -657,6 +661,10 @@ server there that you can connect to. See also `nntp-open-connection-function'" (ignore-errors (nntp-send-string process "QUIT") (unless (eq nntp-open-connection-function 'nntp-open-network-stream) + ;; Ok, this is evil, but when using telnet and stuff + ;; as the connection method, it's important that the + ;; QUIT command actually is sent out before we kill + ;; the process. (sleep-for 1)))) (when (buffer-name (process-buffer process)) (kill-buffer (process-buffer process)))))) @@ -710,7 +718,7 @@ This function is supposed to be called from `nntp-server-opened-hook'. It will look in the \"~/.netrc\" file for matching entries. If nothing suitable is found there, it will prompt for a user name and a password." - (let* ((list (gnus-parse-netrc "~/.netrc")) + (let* ((list (gnus-parse-netrc nntp-netrc-file)) (alist (gnus-netrc-machine list nntp-address)) (user (gnus-netrc-get alist "login")) (passwd (gnus-netrc-get alist "password"))) diff --git a/texi/gnus.texi b/texi/gnus.texi index 34fa45d..9248064 100644 --- a/texi/gnus.texi +++ b/texi/gnus.texi @@ -1,7 +1,7 @@ \input texinfo @c -*-texinfo-*- @setfilename gnus -@settitle Quassia Gnus 0.26 Manual +@settitle Quassia Gnus 0.27 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -313,7 +313,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Quassia Gnus 0.26 Manual +@title Quassia Gnus 0.27 Manual @author by Lars Magne Ingebrigtsen @page @@ -349,7 +349,7 @@ can be gotten by any nefarious means you can think of---@sc{nntp}, local spool or your mbox file. All at the same time, if you want to push your luck. -This manual corresponds to Quassia Gnus 0.26. +This manual corresponds to Quassia Gnus 0.27. @end ifinfo @@ -8857,12 +8857,14 @@ present in this hook. @item nntp-authinfo-function @vindex nntp-authinfo-function @findex nntp-send-authinfo +@vindex nntp-netrc-file This function will be used to send @samp{AUTHINFO} to the @sc{nntp} server. The default function is @code{nntp-send-authinfo}, which looks -through your @file{~/.netrc} for applicable entries. If none are found, -it will prompt you for a login name and a password. The format of the -@file{~/.netrc} file is defined in the @code{ftp} manual page, but here -are the salient facts: +through your @file{~/.netrc} (or whatever you've set the +@code{nntp-netrc-file} variable to) for applicable entries. If none are +found, it will prompt you for a login name and a password. The format +of the @file{~/.netrc} file is defined in the @code{ftp} manual page, +but here are the salient facts: @enumerate @item @@ -15452,6 +15454,7 @@ Also thanks to the following for patches and stuff: Jari Aalto, Adrian Aichner, +Russ Allbery, Peter Arius, Matt Armstrong, Marc Auslander, @@ -15477,6 +15480,7 @@ Ulrik Dickow, Dave Disser, Joev Dubach, Michael Welsh Duggan, +Dave Edmondson, Paul Eggert, Enami Tsugutomo, @c Enami Michael Ernst, @@ -15497,6 +15501,7 @@ Raja R. Harinath, Hisashige Kenji, @c Hisashige Marc Horowitz, Gunnar Horrigmo, +Richard Hoskins, Brad Howes, François Felix Ingrand, Ishikawa Ichiro, @c Ishikawa @@ -15506,6 +15511,7 @@ Rajappa Iyer, Andreas Jaeger, Randell Jesup, Fred Johansen, +Simon Josefsson, Greg Klanderman, Karl Kleinpaste, Peter Skov Knudsen, @@ -15521,6 +15527,7 @@ Dave Love, Tonny Madsen, Shlomo Mahlab, Nat Makarevitch, +Istvan Marko, David Martin, Gordon Matzigkeit, Timo Metzemakers, @@ -15530,6 +15537,7 @@ Morioka Tomohiko, @c Morioka Erik Toubro Nielsen, Hrvoje Niksic, Andy Norman, +Fred Oberhauser, C. R. Oldham, Alexandre Oliva, Ken Olstad, @@ -15541,7 +15549,11 @@ Ulrich Pfeifer, John McClary Prevost, Colin Rafferty, Lars Balker Rasmussen, +Joe Reiss, +Renaud Rioboo, +Roland B. Roberts, Bart Robinson, +Christian von Roques, Jason Rumney, Jay Sachs, Dewey M. Sasser, @@ -15568,9 +15580,11 @@ Chuck Thompson, Philippe Troin, James Troup, Aaron M. Ucko, +Aki Vehtari, Didier Verna, Jan Vroonhof, Stefan Waldherr, +Pete Ware, Barry A. Warsaw, Christoph Wedler, Joe Wells, diff --git a/texi/message.texi b/texi/message.texi index 75be131..b128681 100644 --- a/texi/message.texi +++ b/texi/message.texi @@ -1,7 +1,7 @@ \input texinfo @c -*-texinfo-*- @setfilename message -@settitle Message 0.26 Manual +@settitle Message 0.27 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -39,7 +39,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Message 0.26 Manual +@title Message 0.27 Manual @author by Lars Magne Ingebrigtsen @page @@ -80,7 +80,7 @@ Message mode buffers. * Key Index:: List of Message mode keys. @end menu -This manual corresponds to Message 0.26. Message is distributed with +This manual corresponds to Message 0.27. Message is distributed with the Gnus distribution bearing the same version number as this manual has. -- 1.7.10.4