From e879961efbbb1219da8ed4a20943f37f38d318be Mon Sep 17 00:00:00 2001 From: ichikawa Date: Wed, 12 Aug 1998 02:06:02 +0000 Subject: [PATCH] Sync up with gnus-5.6.33 --- ChangeLog | 6 + lisp/ChangeLog | 380 ++++++++++++++++++++++++++++++---------------------- lisp/gnus-art.el | 163 +++++++++++++--------- lisp/gnus-cite.el | 69 +++++++--- lisp/gnus-group.el | 17 ++- lisp/gnus-int.el | 2 + lisp/gnus-start.el | 26 +++- lisp/gnus.el | 20 +-- lisp/nndoc.el | 6 +- texi/ChangeLog | 24 +++- texi/gnus.texi | 74 +++++++--- texi/message.texi | 6 +- 12 files changed, 491 insertions(+), 302 deletions(-) diff --git a/ChangeLog b/ChangeLog index 9efc17f..a6375f6 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +1998-08-12 Tatsuya Ichikawa + + * lisp/gnus.el (gnus-version-number): Update to 6.8.10. + + * Sync up with Gnus 5.6.33. + 1998-08-11 Keiichi Suzuki * lisp/message.el: Generate New frame when write new message. diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 944b75d..789a602 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,69 @@ +Tue Aug 11 20:46:25 1998 Lars Magne Ingebrigtsen + + * gnus.el: Gnus v5.6.33 is released. + +1998-08-11 20:07:55 Lars Magne Ingebrigtsen + + * gnus-group.el (gnus-group-apropos): Check symbol value. + + * gnus-cite.el (gnus-cited-closed-text-button-line-format): + Changed. + +Tue Aug 11 19:42:42 1998 Lars Magne Ingebrigtsen + + * gnus.el: Gnus v5.6.32 is released. + +1998-08-11 13:36:56 Lars Magne Ingebrigtsen + + * nndoc.el (nndoc-type-alist): Do MIME digests before multiparts. + + * gnus.el (gnus-predefined-server-alist): Expand vars. + +1998-08-09 Dave Love + + * gnus-art.el (article-display-x-face): Don't try (and fail) to + display multiple faces. + +1998-08-11 11:41:43 Lars Magne Ingebrigtsen + + * gnus-art.el (gnus-header-newsgroups-face): Don't bold so much. + + * gnus-group.el (gnus-group-rename-group): Remove old group name + from list of killed groups. + + * gnus-int.el (gnus-get-function): Error better. + + * gnus-art.el (gnus-article-narrow-to-signature): Inhibit motion + hooks. + (article-hide-pgp): Delete text instead of hiding it. + + * gnus-group.el (gnus-group-find-new-groups): Ditto. + + * gnus-start.el (gnus-find-new-newsgroups): Accept C-u C-u as a + total query. + +1998-08-10 09:31:36 Lars Magne Ingebrigtsen + + * gnus-art.el (gnus-article-prepare): Place point at the beginning + of the body. + + * gnus-cite.el (gnus-cite-attribution-face): Changed to italic. + + * gnus-art.el (gnus-article-edit-article): Delete "annotation" + text. + (gnus-insert-prev-page-button): Mark as annotation. + (gnus-insert-next-page-button): Ditto. + + * gnus-cite.el (gnus-cited-closed-text-button-line-format): New + variable. + (gnus-cited-closed-text-button-line-format-alist): Ditto. + (gnus-article-toggle-cited-text): Toggle between different + symbols. + +1998-08-09 19:58:36 Lars Magne Ingebrigtsen + + * gnus.el (gnus-version): Remove backend info. + Sun Aug 9 19:37:40 1998 Lars Magne Ingebrigtsen * gnus.el: Gnus v5.6.31 is released. @@ -14,7 +80,7 @@ Sun Aug 9 19:37:40 1998 Lars Magne Ingebrigtsen 1998-08-09 17:51:25 Lars Magne Ingebrigtsen * gnus-agent.el (gnus-agent-save-group-info): Check whether file - exists. + exists. * message.el (message-goto-signature): Return nil if no sig. (message-delete-not-region): Delete properly if no sig. @@ -27,7 +93,7 @@ Sun Aug 9 19:37:40 1998 Lars Magne Ingebrigtsen * gnus-sum.el (t): Added keystroke for W W C. - * gnus-cite.el (gnus-article-hide-citation-maybe): hiden->hidden. + * gnus-cite.el (gnus-article-hide-citation-maybe): hiden->hidden. Sun Aug 9 15:46:16 1998 Lars Magne Ingebrigtsen @@ -56,7 +122,7 @@ Sun Aug 9 15:46:16 1998 Lars Magne Ingebrigtsen * gnus.el (gnus-continuum-version): Include quassia. - * gnus-sum.el (gnus-data-enter-list): Check before entering list. + * gnus-sum.el (gnus-data-enter-list): Check before entering list. 1998-08-06 11:13:56 Francois Felix Ingrand @@ -72,7 +138,7 @@ Thu Aug 6 07:58:17 1998 Lars Magne Ingebrigtsen * gnus-agent.el (gnus-agent-expire): Check whether (caar gnus-agent-article-alist) is nil. - * gnus.el (gnus-read-method): Allow selecting predefined servers. + * gnus.el (gnus-read-method): Allow selecting predefined servers. * gnus-topic.el (gnus-topic-update-topic-line): Compute right number when inserting missing topic lines. @@ -81,7 +147,7 @@ Thu Aug 6 07:58:17 1998 Lars Magne Ingebrigtsen is alive. * gnus-score.el (gnus-score-load-score-alist): Better error - messaging. + messaging. Tue Aug 4 09:42:31 1998 Kurt Swanson @@ -119,7 +185,7 @@ Tue Aug 4 09:42:31 1998 Kurt Swanson * gnus-sum.el (gnus-select-newsgroup): Set `gnus-newsgroup-unselected' when selecting specific articles via SELECT-ARTICLE - there may be more headers to fetch if - `gnus-fetch-old-headers' is non-nil. + `gnus-fetch-old-headers' is non-nil. (gnus-summary-read-group): pass SELECT-ARTICLE to `gnus-summary-read-group-1' and reset to nil when going to next group. (gnus-summary-read-group): Change `select-article' to @@ -151,7 +217,7 @@ Tue Aug 4 05:25:01 1998 Lars Magne Ingebrigtsen 1998-07-30 21:47:23 Lars Magne Ingebrigtsen * gnus-cache.el (gnus-summary-insert-cached-articles): Sort - articles. + articles. * nndir.el (nndir): Use nnml functions. @@ -191,7 +257,7 @@ Mon Jul 27 03:26:00 1998 Lars Magne Ingebrigtsen 1998-07-26 19:01:58 Lars Magne Ingebrigtsen * gnus-art.el (gnus-request-article-this-buffer): Pass along - header. + header. * gnus-sum.el (gnus-summary-update-article): Don't pass along iheader to regeneration routine. @@ -208,7 +274,7 @@ Sat Jul 25 19:31:36 1998 Lars Magne Ingebrigtsen 1998-07-25 14:53:24 Lars Magne Ingebrigtsen * gnus-salt.el (gnus-pick-mouse-pick-region): Use - gnus-read-event-char. + gnus-read-event-char. Sat Jul 25 02:43:35 1998 Lars Magne Ingebrigtsen @@ -247,7 +313,7 @@ Sat Jul 25 02:43:35 1998 Lars Magne Ingebrigtsen 1998-07-15 10:47:39 Lars Magne Ingebrigtsen * nnvirtual.el (nnvirtual-request-type): Handle non-numerical - articles. + articles. * gnus.el (gnus-news-group-p): Do something sensible with negative articlies. @@ -271,7 +337,7 @@ Wed Jul 15 10:10:07 1998 Lars Magne Ingebrigtsen Wed Jul 15 09:56:47 1998 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-select-newsgroup): Accept select-articles - para, + para, 1998-07-13 Mike McEwan @@ -297,17 +363,17 @@ Sun Jul 12 04:01:22 1998 Lars Magne Ingebrigtsen * gnus-agent.el (gnus-agent-expire): Update group info to add expired articles to list of read articles and prevent - re-fetching. + re-fetching. 1998-07-12 Lars Magne Ingebrigtsen * nnmail.el (nnmail-active-file-coding-system): Changed to - binary. + binary. Sun Jul 12 03:16:18 1998 Lars Magne Ingebrigtsen * gnus-score.el (gnus-score-load-file): Specify which alist to - decay. + decay. 1998-07-12 Lars Magne Ingebrigtsen @@ -329,11 +395,11 @@ Fri Jul 10 04:15:35 1998 Lars Magne Ingebrigtsen Fri Jul 10 03:03:48 1998 François Pinard * gnus-sum.el (gnus-summary-respool-trace): New command and - keystroke. + keystroke. Fri Jul 10 02:18:01 1998 Lars Magne Ingebrigtsen - * gnus-util.el (gnus-prin1): Bind print-escape-multibyte to nil. + * gnus-util.el (gnus-prin1): Bind print-escape-multibyte to nil. Mon Jul 6 01:02:59 1998 Simon Josefsson @@ -362,7 +428,7 @@ Wed Jul 1 17:30:41 1998 Lars Magne Ingebrigtsen * gnus-topic.el (gnus-topic-mode-map): Bind TAB and M-TAB. * gnus-sum.el (gnus-build-sparse-threads): Make sure no dates are - nil. + nil. (gnus-summary-limit-mark-excluded-as-read): Use the intersection. * gnus-msg.el (gnus-setup-message): Clone all local variables from @@ -383,7 +449,7 @@ Wed Jul 1 13:33:26 1998 Lars Magne Ingebrigtsen Wed Jul 1 12:52:32 1998 Lars Magne Ingebrigtsen - * nntp.el (nntp-record-command): Give more precise time info. + * nntp.el (nntp-record-command): Give more precise time info. (nntp-next-result-arrived-p): Look for the end of error lines. Wed Jul 1 12:24:06 1998 François Pinard @@ -425,7 +491,7 @@ Mon Jun 29 21:22:46 1998 Lars Magne Ingebrigtsen Sun Jun 28 14:32:08 1998 Lars Magne Ingebrigtsen - * gnus-spec.el (gnus-face-face-function): Double quoting removed. + * gnus-spec.el (gnus-face-face-function): Double quoting removed. Sun Jun 28 09:54:52 1998 Lars Magne Ingebrigtsen @@ -437,7 +503,7 @@ Sun Jun 28 08:51:39 1998 Lars Magne Ingebrigtsen a temp buffer before replacing. * gnus-msg.el (gnus-post-news): Treat broken-reply-to in - followups. + followups. * gnus-sum.el (gnus-summary-goto-subject): Position point. @@ -451,7 +517,7 @@ Sat Jun 27 09:19:20 1998 Lars Magne Ingebrigtsen * gnus-util.el (gnus-put-text-properties-excluding-characters-with-faces): New - function. + function. Sat Jun 27 08:56:08 1998 Lars Magne Ingebrigtsen @@ -464,7 +530,7 @@ Sat Jun 27 08:49:51 1998 Arne Georg Gleditsch Sat Jun 27 08:45:09 1998 Lars Magne Ingebrigtsen * message.el (message-check-news-body-syntax): Buggy checksum - check. + check. Sat Jun 27 07:59:22 1998 Lars Magne Ingebrigtsen @@ -481,7 +547,7 @@ Sat Jun 27 03:18:57 1998 Lars Magne Ingebrigtsen * nnfolder.el (nnfolder-request-replace-article): Check all X-From headers. - * gnus-sum.el (gnus-update-marks): Don't nix out cache lists. + * gnus-sum.el (gnus-update-marks): Don't nix out cache lists. * nngateway.el (nngateway-mail2news-header-transformation): Changed semantics. @@ -513,7 +579,7 @@ Fri Jun 26 13:45:24 1998 Lars Magne Ingebrigtsen * gnus-util.el (gnus-delete-alist): New function. * gnus-sum.el (gnus-update-marks): Don't save list of cached - articles. + articles. * message.el (message-mode-menu): Include kill-buffer. @@ -530,7 +596,7 @@ Fri Jun 26 13:45:09 1998 Richard Stallman Fri Jun 26 13:30:42 1998 Kevin Christian * gnus-score.el (gnus-score-string): Do updating of scores after - fuzzies. + fuzzies. Fri Jun 26 07:26:03 1998 Lars Magne Ingebrigtsen @@ -548,7 +614,7 @@ Fri Jun 26 04:29:44 1998 Lars Magne Ingebrigtsen * gnus-score.el (gnus-score-load-file): Would ignore all score files without un-advanced rules. - * gnus-ems.el ((fboundp 'split-string)): Use it where it exists. + * gnus-ems.el ((fboundp 'split-string)): Use it where it exists. Fri Jun 26 04:23:12 1998 Lars Magne Ingebrigtsen @@ -557,7 +623,7 @@ Fri Jun 26 04:23:12 1998 Lars Magne Ingebrigtsen Fri Jun 26 03:39:32 1998 Lars Magne Ingebrigtsen * nnfolder.el (nnfolder-request-replace-article): Delete old - delimiter. + delimiter. * gnus-msg.el (gnus-summary-reply): Use it. @@ -582,9 +648,9 @@ Thu Jun 25 10:35:48 1998 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-summary-limit-to-age): Reverse logic. * gnus-score.el (gnus-summary-score-entry): Removed interactive - spec. + spec. ((gnus-summary-score-map "V" gnus-summary-mode-map)): Removed - keystroke. + keystroke. * gnus-art.el (gnus-article-show-summary): Position point. @@ -608,7 +674,7 @@ Thu Jun 25 05:13:31 1998 Lars Magne Ingebrigtsen * gnus-salt.el (gnus-pick-mode-map): Reinstated keymap. * gnus-sum.el (gnus-build-sparse-threads): Put the proper date - in. + in. Wed Jun 24 07:52:30 1998 Lars Magne Ingebrigtsen @@ -621,12 +687,12 @@ Wed Jun 24 07:47:04 1998 Lars Magne Ingebrigtsen Wed Jun 24 07:33:17 1998 Vladimir Alexiev * nnvirtual.el (nnvirtual-update-xref-header): Regexp-quote group - name. + name. Wed Jun 24 06:15:27 1998 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-build-sparse-threads): Give all the sparse - articles the date of the current child. + articles the date of the current child. * gnus-topic.el (gnus-group-topic-parameters): Didn't compute. @@ -657,7 +723,7 @@ Wed Jun 24 03:04:05 1998 Kim-Minh Kaplan Wed Jun 24 02:49:57 1998 Castor - * nntp.el (nntp-open-ssl-stream): + * nntp.el (nntp-open-ssl-stream): Wed Jun 24 02:31:46 1998 Lars Magne Ingebrigtsen @@ -667,7 +733,7 @@ Wed Jun 24 02:31:46 1998 Lars Magne Ingebrigtsen Wed Jun 24 01:43:26 1998 Decklin Foster * nngateway.el (nngateway-mail2news-header-transformation): New - function. + function. Wed Jun 24 00:25:45 1998 Lars Magne Ingebrigtsen @@ -681,18 +747,18 @@ Wed Jun 24 00:25:45 1998 Lars Magne Ingebrigtsen Tue Jun 23 23:58:48 1998 Lars Magne Ingebrigtsen * gnus-topic.el (gnus-topic-prepare-topic): Respect visible topic - param. + param. (gnus-topic-hierarchical-parameters): New function. 1998-06-02 Didier Verna * gnus-picon.el (gnus-get-buffer-name): use get-buffer-create - instead of get-buffer + instead of get-buffer Wed Jun 3 04:41:45 1998 Lars Magne Ingebrigtsen * nnkiboze.el (nnkiboze-request-delete-group): Delete .newsrc - file. + file. * nnmail.el (nnmail-article-group): Nuke looong lines. @@ -781,7 +847,7 @@ Sat May 23 19:44:43 1998 Lars Magne Ingebrigtsen Tue May 19 04:11:33 1998 Yoshiki Hayashi * nnheader.el (nnheader-translate-file-chars): Don't change - string. + string. Tue May 19 03:07:45 1998 P. E. Jareth Hein @@ -798,7 +864,7 @@ Tue May 12 06:12:42 1998 Lars Magne Ingebrigtsen Sun May 10 19:08:28 1998 Lars Magne Ingebrigtsen * gnus-group.el (gnus-group-read-ephemeral-group): Don't add - `address'. + `address'. Sun May 3 18:01:01 1998 Lars Magne Ingebrigtsen @@ -831,7 +897,7 @@ Sat May 2 01:36:37 1998 Lars Magne Ingebrigtsen `find-file-hooks' to nil. * nnmail.el (nnmail-process-unix-mail-format): Don't use - `find-file-noselect'. + `find-file-noselect'. * gnus-group.el (gnus-group-make-menu-bar): Typo. @@ -863,7 +929,7 @@ Fri May 1 16:56:32 1998 Lars Magne Ingebrigtsen buffer. * gnus-soup.el (gnus-soup-parse-areas): Check whether the file - exists. + exists. * gnus-draft.el (gnus-draft-send): Use meta-information. @@ -875,7 +941,7 @@ Fri May 1 16:56:32 1998 Lars Magne Ingebrigtsen Fri May 1 16:43:35 1998 Paul Franklin * message.el (message-generate-headers): Insert Sender when - required. + required. Fri May 1 15:28:55 1998 Lars Magne Ingebrigtsen @@ -885,10 +951,10 @@ Fri May 1 15:28:55 1998 Lars Magne Ingebrigtsen when hiding. * gnus-msg.el (gnus-post-method): Allow ARG to override - `current'. + `current'. * gnus-sum.el (gnus-remove-thread): Remove the dummy root - properly. + properly. * nnfolder.el (nnfolder-goto-article): New function. (nnfolder-retrieve-headers): Use it. @@ -906,7 +972,7 @@ Wed Apr 29 20:54:35 1998 Lars Magne Ingebrigtsen dummy roots. * gnus-cache.el (gnus-cache-enter-article): Update marks - properly. + properly. * gnus-xmas.el (gnus-xmas-draft-menu-add): New function. @@ -922,22 +988,22 @@ Wed Apr 29 20:54:35 1998 Lars Magne Ingebrigtsen Wed Apr 29 20:18:45 1998 Kurt Swanson * gnus-art.el (article-update-date-lapsed): Bind - `deactivate-mark'. + `deactivate-mark'. * gnus-salt.el (gnus-pick-mode-map): Moved keys around to avoid - shadowing. + shadowing. * gnus-art.el (gnus-article-read-summary-keys): New version. - * gnus-sum.el (gnus-summary-make-menu-bar): New for article mode. + * gnus-sum.el (gnus-summary-make-menu-bar): New for article mode. * gnus-msg.el (gnus-post-method): `current' custom. Wed Apr 29 19:04:27 1998 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-summary-set-local-parameters): Ignore - quit-config. - (gnus-select-newsgroup): Use the value of gnus-fetch-old-headers. + quit-config. + (gnus-select-newsgroup): Use the value of gnus-fetch-old-headers. * message.el (message-post-method): Doc fix. @@ -956,7 +1022,7 @@ Tue Apr 28 03:15:50 1998 Hallvard B. Furuseth Tue Apr 28 03:00:16 1998 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-parent-headers): Don't infloop on nil - References. + References. * gnus-art.el (gnus-article-mode): Don't kill local vars. @@ -1011,9 +1077,9 @@ Sun Apr 26 14:34:06 1998 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-summary-update-info): Don't nix out scores. * gnus-start.el (gnus-active-to-gnus-format): Removed "." from - quoting. + quoting. - * gnus.el (gnus-cache-directory): Moved here. + * gnus.el (gnus-cache-directory): Moved here. (gnus-predefined-server-alist): Use. * message.el (message-autosave-directory): Put back in. @@ -1036,7 +1102,7 @@ Sun Apr 26 14:34:06 1998 Lars Magne Ingebrigtsen Sun Apr 26 14:05:40 1998 Frank Bennett * nnmail.el (nnmail-move-inbox): Push error'ed mailboxes onto the - list. + list. Sun Apr 26 13:01:53 1998 Lars Magne Ingebrigtsen @@ -1108,7 +1174,7 @@ Wed Apr 1 16:01:44 1998 Lars Magne Ingebrigtsen Sun Mar 29 11:54:33 1998 Lars Magne Ingebrigtsen * nnkiboze.el (nnkiboze-generate-group): Would mess up newsrs - hashtb. + hashtb. (nnkiboze-enter-nov): Created bogus Xrefs headers. * gnus-agent.el (gnus-agent-save-group-info): New function. @@ -1118,7 +1184,7 @@ Sun Mar 29 11:54:33 1998 Lars Magne Ingebrigtsen * message.el (message-expand-group): Allow completion from in the middle of strings. (message-font-lock-keywords): Work when mail-header-separator is - "". + "". Sun Mar 29 09:56:00 1998 Lars Magne Ingebrigtsen @@ -1173,7 +1239,7 @@ Thu Mar 19 15:09:14 1998 Wes Hardaker 1998-03-17 Per Abrahamsen * gnus-uu.el (gnus-uu-digest-headers): Add `Content-Type' and - `Content-Transfer-Encoding'. + `Content-Transfer-Encoding'. 1998-03-18 Per Abrahamsen @@ -1201,7 +1267,7 @@ Thu Mar 19 12:44:12 1998 Lars Magne Ingebrigtsen * gnus-msg.el: Would use nil group names. * nntp.el (nntp-send-authinfo): Send authinfo to "force"d - servers. + servers. * gnus-util.el (gnus-parse-netrc): Accept the "force" token. @@ -1238,7 +1304,7 @@ Fri Mar 13 22:07:17 1998 Shenghuo ZHU Fri Mar 13 21:10:24 1998 Lars Magne Ingebrigtsen - * nnvirtual.el (nnvirtual-request-group): Force updating of info. + * nnvirtual.el (nnvirtual-request-group): Force updating of info. Sun Mar 8 20:46:51 1998 Lars Magne Ingebrigtsen @@ -1251,7 +1317,7 @@ Sun Mar 8 14:05:25 1998 Lars Magne Ingebrigtsen Sun Mar 8 00:35:09 1998 Lars Magne Ingebrigtsen * gnus-picon.el (gnus-get-buffer-name): Look in the assoc for the - variable. + variable. * nntp.el (nntp-wait-for): Check more for dead connections. @@ -1311,7 +1377,7 @@ Sat Mar 7 15:01:57 1998 Lars Magne Ingebrigtsen Sat Mar 7 15:00:05 1998 Wes Hardaker * gnus-art.el (gnus-article-prepare): Mark articles as - downloadable. + downloadable. Wed Mar 4 22:33:27 1998 Ken Raeburn @@ -1360,10 +1426,10 @@ Sat Feb 28 13:35:26 1998 Lars Magne Ingebrigtsen (nntp-record-commands): New variable. (nntp-record-command): New function. - * gnus-agent.el (gnus-agent-group-path): Use real name of group. + * gnus-agent.el (gnus-agent-group-path): Use real name of group. * gnus-sum.el (gnus-summary-insert-subject): Don't allow nil - articles. + articles. (gnus-summary-read-group): Respect backward movement. 1998-03-01 Kim-Minh Kaplan @@ -1397,7 +1463,7 @@ Sat Feb 28 08:17:37 1998 Lars Magne Ingebrigtsen Sat Feb 28 08:10:27 1998 Lars Magne Ingebrigtsen * gnus-picon.el (gnus-picons-display-x-face): `buf' -- unbound - var. + var. Sat Feb 28 08:03:23 1998 François Pinard @@ -1409,7 +1475,7 @@ Sat Feb 28 07:43:00 1998 Nelson Jose dos Santos Ferreira - * gnus-start.el (gnus-ask-server-for-new-groups): Message more. + * gnus-start.el (gnus-ask-server-for-new-groups): Message more. Fri Feb 27 13:26:34 1998 Lars Magne Ingebrigtsen @@ -1430,7 +1496,7 @@ Mon Feb 23 18:26:48 1998 Lars Magne Ingebrigtsen * gnus-ems.el (gnus-ems-redefine): Define 'gnus-summary-set-display-table as a function that takes no - params. + params. * gnus.el (gnus-interactive): Don't use gnus-sum macros. (gnus-valid-select-methods): Include nnlistserv. @@ -1494,7 +1560,7 @@ Sat Feb 21 00:09:14 1998 Lars Magne Ingebrigtsen the mark doesn't change. * gnus-art.el (gnus-article-prepare): Don't enter article into - cache. + cache. * gnus-sum.el (gnus-summary-reparent-thread): Don't mark as read. (gnus-summary-mark-article): Don't do cache things here. @@ -1504,7 +1570,7 @@ Sat Feb 21 00:09:14 1998 Lars Magne Ingebrigtsen Fri Feb 20 22:56:22 1998 Lars Magne Ingebrigtsen * gnus-srvr.el (gnus-browse-unsubscribe-group): Wouldn't allow - unsubscription. + unsubscription. * gnus-sum.el (gnus-summary-insert-subject): Allow inserting articles outside limits. @@ -1512,7 +1578,7 @@ Fri Feb 20 22:56:22 1998 Lars Magne Ingebrigtsen * gnus-start.el (gnus-dribble-enter): Update mode line. * gnus-srvr.el (gnus-browse-unsubscribe-group): Allow - unsubscription. + unsubscription. * gnus-picon.el (gnus-article-display-picons): Check that the extents are live first. @@ -1528,7 +1594,7 @@ Thu Feb 19 02:28:17 1998 Jens-Ulrik Holger Petersen * gnus-sum.el (gnus-get-newsgroup-headers): Just use the header - value. + value. (gnus-summary-exit): Set global vars. Tue Feb 17 07:17:49 1998 Lars Magne Ingebrigtsen @@ -1544,7 +1610,7 @@ Tue Feb 17 07:00:43 1998 Lars Magne Ingebrigtsen Tue Feb 17 06:15:03 1998 Lars Magne Ingebrigtsen * nnmail.el (nnmail-purge-split-history): List of alists, not - alist. + alist. Mon Feb 16 20:22:04 1998 Lars Magne Ingebrigtsen @@ -1553,10 +1619,10 @@ Mon Feb 16 20:22:04 1998 Lars Magne Ingebrigtsen 1998-02-16 Lars Magne Ingebrigtsen * message.el (message-dont-send): Make sure the article really is - saved. + saved. * nnmail.el (nnmail-purge-split-history): Alist; not a list of - alists. + alists. 1998-02-16 Hrvoje Niksic @@ -1571,7 +1637,7 @@ Mon Feb 16 20:22:04 1998 Lars Magne Ingebrigtsen 1998-02-16 Lars Magne Ingebrigtsen * gnus-util.el (gnus-run-hooks): Use unwind-protect instead of - save-excursion. + save-excursion. 1998-02-16 Per Abrahamsen @@ -1603,7 +1669,7 @@ Sun Feb 15 19:41:14 1998 Lars Magne Ingebrigtsen Sun Feb 15 19:35:11 1998 Kurt Swanson * gnus-art.el (gnus-article-read-summary-keys): Go to top on - some. + some. Sun Feb 15 19:26:21 1998 SeokChan LEE @@ -1636,14 +1702,14 @@ Sun Feb 15 14:23:51 1998 Lars Magne Ingebrigtsen * message.el (message-mode): Set font-lock things before running mode hook. - * gnus-agent.el (gnus-agent-group-path): Respect long file names. + * 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. + * gnus-agent.el (gnus-agent-toggle-plugged): un/plug before hook. Sat Feb 14 21:08:03 1998 Kim-Minh Kaplan @@ -1660,7 +1726,7 @@ Sat Feb 14 19:28:01 1998 Lars Magne Ingebrigtsen Sat Feb 14 18:40:55 1998 Lars Magne Ingebrigtsen - * gnus-agent.el (gnus-agent-directory): Translate file chars. + * gnus-agent.el (gnus-agent-directory): Translate file chars. * gnus-sum.el (gnus-summary-print-article): Don't display all headers. @@ -1671,7 +1737,7 @@ Sat Feb 14 18:40:55 1998 Lars Magne Ingebrigtsen Sat Feb 14 18:39:45 1998 Fred Oberhauser * nnmail.el (nnmail-process-babyl-mail-format): Fix point - movement. + movement. Sat Feb 14 18:31:39 1998 Lars Magne Ingebrigtsen @@ -1708,7 +1774,7 @@ Sat Feb 14 17:41:44 1998 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-summary-work-articles): change buffer before looking at marked articles (gnus-summary-work-articles): better check of marked articles - + Sat Feb 14 15:10:36 1998 Lars Magne Ingebrigtsen * nntp.el (nntp-send-authinfo): Use new .netrc functionality. @@ -1722,10 +1788,10 @@ Sat Feb 14 15:10:36 1998 Lars Magne Ingebrigtsen * gnus.el (gnus-expert-user): Dix fox. - * nnmail.el (nnmail-article-group): Remove duplicates from split. + * nnmail.el (nnmail-article-group): Remove duplicates from split. * message.el (message-check-news-header-syntax): Check more on - Message-ID. + Message-ID. * nnmh.el: Don't call nnmail-activate. @@ -1783,7 +1849,7 @@ Fri Feb 13 17:10:31 1998 Lars Magne Ingebrigtsen (gnus-cite-parse-maybe): Use it. * gnus-sum.el (gnus-summary-move-article): Move back to summary - buffer. + buffer. * nnfolder.el (nnfolder-request-accept-article): Save excursion. (nnfolder-request-move-article): Ditto. @@ -1816,12 +1882,12 @@ Tue Feb 10 21:59:53 1998 Lars Magne Ingebrigtsen * gnus-agent.el (gnus-agent-fetch-session): Reversed reversal. * gnus-topic.el (gnus-topic-rename): Check whether the new name - exists. + exists. Tue Feb 10 21:39:47 1998 dave edmondson * message.el (message-font-lock-keywords): Allow : as a citation - ending. + ending. Tue Feb 10 20:09:02 1998 Lars Magne Ingebrigtsen @@ -1832,11 +1898,11 @@ Mon Feb 9 17:02:09 1998 Lars Magne Ingebrigtsen * message.el (message-fill-header): Fill to column 990. * gnus-score.el (gnus-score-load-file): Exclude all excluded - files. + files. Mon Feb 9 16:55:41 1998 jari aalto - * gnus-art.el (gnus-article-time-format): Extended variable. + * gnus-art.el (gnus-article-time-format): Extended variable. Mon Feb 9 16:27:59 1998 Lars Magne Ingebrigtsen @@ -1868,7 +1934,7 @@ Sun Feb 8 18:13:58 1998 Lars Magne Ingebrigtsen Sun Feb 8 17:20:40 1998 Lars Magne Ingebrigtsen - * gnus-group.el (gnus-update-group-mark-positions): Bind `topic'. + * gnus-group.el (gnus-update-group-mark-positions): Bind `topic'. * message.el (message-expand-group): Added doc string. @@ -1878,7 +1944,7 @@ Sun Feb 8 17:20:40 1998 Lars Magne Ingebrigtsen Sun Feb 8 16:44:36 1998 Richard Hoskins * message.el (message-kill-to-signature): Don't kill the - delimiter. + delimiter. Sun Feb 8 16:15:33 1998 Lars Magne Ingebrigtsen @@ -1886,7 +1952,7 @@ Sun Feb 8 16:15:33 1998 Lars Magne Ingebrigtsen (gnus-summary-read-group-1): Use it. * message.el (message-cite-original-without-signature): New - function. + function. (message-cite-function): Added to custom. 1998-01-13 Per Abrahamsen @@ -1909,7 +1975,7 @@ Mon Feb 2 18:56:22 1998 Lars Magne Ingebrigtsen (gnus-agent-fetch-session): Use it. * gnus-art.el (article-strip-all-blank-lines): New command and - keystroke. + keystroke. Sun Feb 1 18:00:54 1998 Lars Magne Ingebrigtsen @@ -1926,7 +1992,7 @@ Sun Feb 1 18:00:54 1998 Lars Magne Ingebrigtsen Thu Jan 15 22:47:38 1998 * gnus-art.el (gnus-request-article-this-buffer): Put it into the - backlog. + backlog. Mon Jan 12 23:30:59 1998 Lars Magne Ingebrigtsen @@ -1984,15 +2050,15 @@ Sun Jan 4 14:28:35 1998 Lars Magne Ingebrigtsen 1997-12-10 Per Abrahamsen * gnus/gnus-msg.el (gnus-inews-insert-mime-headers): Added - documentation. + documentation. (gnus-inews-insert-mime-headers): Made it work with Emacs MULE. (gnus-inews-insert-mime-headers): Added as option to - `message-header-hook'. + `message-header-hook'. 1997-12-22 Per Abrahamsen * gnus/gnus-art.el (gnus-button-alist): Assume msg-id after "in - message". + message". 1997-12-22 Simon Josefsson @@ -2008,9 +2074,9 @@ Sun Jan 4 13:35:14 1998 Lars Magne Ingebrigtsen * nndraft.el (nndraft-request-associate-buffer): Open the damn server first. Sheesh. - * gnus-draft.el (gnus-draft-send): Bind message-send-hook to nil. + * gnus-draft.el (gnus-draft-send): Bind message-send-hook to nil. - * gnus-sum.el (gnus-summary-catchup): Don't nix out downloadable. + * gnus-sum.el (gnus-summary-catchup): Don't nix out downloadable. (gnus-summary-highlight): Highlight down/un as unread. Sun Jan 4 13:27:31 1998 Kim-Minh Kaplan @@ -2020,7 +2086,7 @@ Sun Jan 4 13:27:31 1998 Kim-Minh Kaplan Sun Jan 4 13:18:04 1998 Lars Magne Ingebrigtsen * nnsoup.el (nnsoup-store-reply): Bind mail-header-separator to - "". + "". * gnus-xmas.el (gnus-xmas-agent-server-menu-add): New. @@ -2085,7 +2151,7 @@ Fri Dec 19 21:39:43 1997 Hrvoje Niksic Fri Dec 19 21:26:08 1997 Lars Magne Ingebrigtsen - * gnus-cache.el (gnus-cache-read-active): Check for empty files. + * gnus-cache.el (gnus-cache-read-active): Check for empty files. Sun Dec 14 11:46:50 1997 Lars Magne Ingebrigtsen @@ -2094,7 +2160,7 @@ Sun Dec 14 11:46:50 1997 Lars Magne Ingebrigtsen 1997-12-10 SL Baur - * gnus-start.el (gnus-read-descriptions-file): Really bind and gag + * gnus-start.el (gnus-read-descriptions-file): Really bind and gag Mule. Fri Dec 5 15:15:05 1997 Danny Siu @@ -2108,7 +2174,7 @@ Sun Dec 14 11:11:22 1997 Lars Magne Ingebrigtsen * gnus-uu.el (gnus-uu-pre-uudecode-hook): New hook. * gnus-sum.el (gnus-summary-read-group-1): Set mode line after - configuring. + configuring. Sun Dec 14 11:03:26 1997 Wes Hardaker @@ -2130,7 +2196,7 @@ Sat Dec 6 17:27:04 1997 Kim-Minh Kaplan Sat Dec 6 17:23:26 1997 Christian von Roques * gnus-start.el (gnus-read-descriptions-file): Fix - enable-multibyte-characters. + enable-multibyte-characters. 1997-12-05 Dave Love @@ -2143,7 +2209,7 @@ Sat Dec 6 17:23:26 1997 Christian von Roques Sat Dec 6 17:16:28 1997 Lars Balker Rasmussen - * gnus-art.el (article-make-date-line): Don't add extra newlines. + * gnus-art.el (article-make-date-line): Don't add extra newlines. 1997-11-27 MORIOKA Tomohiko @@ -2158,7 +2224,7 @@ Sat Dec 6 17:04:40 1997 Kim-Minh Kaplan * nnml.el (nnml-parse-head): Out-of-bounds fix. * nndraft.el (nndraft-request-associate-buffer): Get proper file - name. + name. Sat Dec 6 15:35:37 1997 Gary D. Foster @@ -2167,7 +2233,7 @@ Sat Dec 6 15:35:37 1997 Gary D. Foster Thu Nov 27 19:56:59 1997 Lars Magne Ingebrigtsen * gnus-agent.el (gnus-summary-set-agent-mark): Remove marks - properly. + properly. 1997-11-27 Christoph Wedler @@ -2196,7 +2262,7 @@ Wed Nov 26 18:19:29 1997 Lars Magne Ingebrigtsen * nnweb.el (nnweb-type-definition): Rescued dejanewsold. * gnus-mh.el (gnus-summary-save-in-folder): Reverted to old - version. + version. * gnus-sum.el (gnus-kill-or-deaden-summary): Save excursion. @@ -2205,7 +2271,7 @@ Wed Nov 26 18:19:29 1997 Lars Magne Ingebrigtsen * gnus-start.el (gnus-setup-news): Always push archive server. * gnus-sum.el (gnus-read-header): Would bug out on sparse - articles. + articles. Wed Nov 26 17:50:41 1997 Kurt Swanson @@ -2218,16 +2284,16 @@ Wed Nov 26 17:40:57 1997 Lars Magne Ingebrigtsen Wed Nov 26 16:04:25 1997 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-summary-move-article): Don't work on canceled - articles. + articles. * gnus-start.el (gnus-subscribe-hierarchical-interactive): Use - `read-char-exclusive'. + `read-char-exclusive'. * gnus-sum.el (gnus-summary-mode): Localize - gnus-summary-dummy-line-format. + gnus-summary-dummy-line-format. * nnml.el (nnml-open-nov): Check that the file exists before - inserting it. + inserting it. * gnus-art.el (article-date-ut): Insert a newline if needed. @@ -2245,7 +2311,7 @@ Wed Nov 26 15:47:40 1997 Greg Klanderman Wed Nov 26 15:43:53 1997 Lars Magne Ingebrigtsen * gnus-start.el (gnus-setup-news): Protect against nil - gnus-message-archive-method. + gnus-message-archive-method. 1997-11-26 Christoph Wedler @@ -2269,7 +2335,7 @@ Wed Nov 26 13:50:01 1997 Alastair Burt Wed Nov 26 13:45:35 1997 Lars Magne Ingebrigtsen - * gnus-util.el (gnus-kill-all-overlays): Remove check for XEmacs. + * gnus-util.el (gnus-kill-all-overlays): Remove check for XEmacs. 1997-09-30 Dave Love @@ -2299,7 +2365,7 @@ Wed Nov 26 10:31:17 1997 Lars Magne Ingebrigtsen that spanned several lines. * gnus-util.el (gnus-date-iso8601): Didn't pick out the date - header. + header. * gnus-demon.el (gnus-demon-scan-mail): Clean inboxes. @@ -2311,7 +2377,7 @@ Wed Nov 26 10:31:17 1997 Lars Magne Ingebrigtsen Wed Nov 26 08:54:26 1997 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-summary-update-info): Would use wrong group - name. + name. 1997-11-26 Hrvoje Niksic @@ -2336,7 +2402,7 @@ Wed Nov 26 08:54:26 1997 Lars Magne Ingebrigtsen Wed Nov 26 08:31:28 1997 Lars Magne Ingebrigtsen - * gnus-art.el (gnus-stop-date-timer): Cancel instead of delete. + * gnus-art.el (gnus-stop-date-timer): Cancel instead of delete. (gnus-start-date-timer): Use the numerical prefix. Tue Nov 25 20:03:34 1997 Lars Magne Ingebrigtsen @@ -2350,7 +2416,7 @@ Tue Nov 25 19:57:55 1997 Dan Christensen Tue Nov 25 19:54:00 1997 Lars Magne Ingebrigtsen * gnus-move.el (gnus-move-group-to-server): Protect agains - nil-ness. + nil-ness. Tue Nov 25 19:03:38 1997 Lars Magne Ingebrigtsen @@ -2359,7 +2425,7 @@ Tue Nov 25 19:03:38 1997 Lars Magne Ingebrigtsen Tue Nov 25 16:05:01 1997 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-read-header): Remove thread entry before - rebuilding. + rebuilding. * gnus-cite.el (gnus-cite-add-face): Keep track of all overlays. @@ -2369,10 +2435,10 @@ Tue Nov 25 16:05:01 1997 Lars Magne Ingebrigtsen (article-date-ut): Would move around. * gnus-group.el (gnus-group-read-ephemeral-group): Accept server - names. + names. * gnus-srvr.el (gnus-browse-foreign-server): Use proper server - names. + names. * gnus.el (gnus-group-prefixed-name): Give the right result for native groups. @@ -2404,7 +2470,7 @@ Mon Nov 24 18:07:21 1997 Lars Magne Ingebrigtsen Mon Nov 24 17:36:00 1997 Lars Magne Ingebrigtsen * message.el (message-reply): Respect Mail-Copies-To even when - `to-address'. + `to-address'. Mon Nov 24 17:32:47 1997 Thor Kristoffersen @@ -2416,7 +2482,7 @@ Mon Nov 24 16:18:19 1997 Lars Magne Ingebrigtsen entering group. * gnus-start.el (gnus-setup-news): Get correct value of archive - server. + server. Wed Oct 8 20:29:35 1997 Robert Bihlmeyer @@ -2429,7 +2495,7 @@ Mon Nov 24 14:09:00 1997 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-last-newsgroup-variables-set): New variable. (gnus-set-global-variables): Don't do to much; gets run off of - pre-command-hook. + pre-command-hook. Got rid of gnus-set-global-variables throughout. (gnus-summary-exit): Update adaptive scoring here. (gnus-summary-isearch-article): Widen. @@ -2461,12 +2527,12 @@ Sun Nov 23 14:04:07 1997 Lars Magne Ingebrigtsen bound. And gagged. * message.el (message-send-mail-with-mh): Use - `mh-new-draft-name'. + `mh-new-draft-name'. * nnfolder.el (nnfolder-read-folder): Save new buffers. * gnus-sum.el (gnus-summary-make-menu-bar): Removed "write to - file". + file". * gnus-util.el (gnus-byte-code): Use indirect-function. @@ -2475,7 +2541,7 @@ Sun Nov 23 14:04:07 1997 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-summary-reparent-thread): Update thread. * gnus-score.el (gnus-all-score-files): Don't do anything unless - GROUP. + GROUP. * nnmail.el (nnmail-split-it): Save-excursion. (nnmail-group-pathname): Translate file chars. @@ -2483,7 +2549,7 @@ Sun Nov 23 14:04:07 1997 Lars Magne Ingebrigtsen Sun Nov 23 13:41:10 1997 Gunnar Horrigmo * gnus-sum.el (gnus-summary-exit): Don't skip if group - disappeared. + disappeared. Sun Nov 23 13:32:55 1997 Lars Magne Ingebrigtsen @@ -2509,7 +2575,7 @@ Sun Nov 23 12:44:38 1997 Lars Magne Ingebrigtsen Sun Nov 23 12:15:00 1997 Hallvard B. Furuseth * gnus-sum.el (gnus-summary-limit-include-thread): Interactive - fix. + fix. Sun Nov 23 07:06:58 1997 Lars Magne Ingebrigtsen @@ -2530,7 +2596,7 @@ Sat Nov 22 18:04:34 1997 Lars Magne Ingebrigtsen Sat Nov 22 18:01:26 1997 Didier Verna - * gnus-sum.el (gnus-summary-remove-bookmark): Interactive spec. + * gnus-sum.el (gnus-summary-remove-bookmark): Interactive spec. Mon Nov 17 23:50:51 1997 Lars Magne Ingebrigtsen @@ -2548,7 +2614,7 @@ Thu Nov 13 22:57:23 1997 Kenichi Handa Thu Nov 13 22:30:19 1997 seokchan lee * message.el (message-ignored-supersedes-headers): Ignore more - headers. + headers. Thu Nov 13 22:28:13 1997 Lars Magne Ingebrigtsen @@ -2580,15 +2646,15 @@ Thu Nov 6 01:53:51 1997 Stefan Waldherr Thu Nov 6 01:52:43 1997 Lars Magne Ingebrigtsen * gnus-topic.el (gnus-topic-change-level): Really delete multiple - instances. + instances. Wed Nov 5 14:04:54 1997 Lars Magne Ingebrigtsen * gnus-topic.el (gnus-topic-update-topic-line): Possibly fix nil - numbers. + numbers. * gnus-sum.el (gnus-summary-show-article): New command and - keystroke. + keystroke. Tue Nov 4 06:29:58 1997 Lars Magne Ingebrigtsen @@ -2604,7 +2670,7 @@ Sat Oct 25 05:52:22 1997 Lars Magne Ingebrigtsen Sat Oct 25 00:39:42 1997 Lars Balker Rasmussen * gnus-art.el (gnus-article-fill-paragraph): New command and - keystroke. + keystroke. 1997-10-16 Colin Rafferty @@ -2631,7 +2697,7 @@ Mon Oct 13 00:01:35 1997 Lars Magne Ingebrigtsen Sun Oct 12 23:54:55 1997 ISO-2022-JP * gnus-agent.el (gnus-agent-article-file-coding-system): New - variable. + variable. Sun Oct 12 16:46:11 1997 Lars Magne Ingebrigtsen @@ -2659,21 +2725,21 @@ Sat Oct 4 00:16:39 1997 Lars Magne Ingebrigtsen * nnmail.el (nnmail-delete-incoming): Changed default to nil. * gnus-int.el (gnus-request-scan): Don't do anything if - unplugged. + unplugged. Fri Oct 3 21:09:19 1997 Lars Magne Ingebrigtsen * gnus-art.el (gnus-ignored-headers): Doc fix. * gnus-demon.el (gnus-demon-add-nntp-close-connection): New - function. + function. (gnus-demon-nntp-close-connection): Ditto. * nntp.el (nntp-last-command-time): New variable. (nntp-retrieve-data): Use it. * message.el (message-news-p): Messages with Posted-To aren't - news. + news. (message-mode): Heed message-yank-prefix when filling. * nndraft.el (nndraft-request-restore-buffer): Remove Xrefs and @@ -2695,7 +2761,7 @@ Sat Sep 27 12:57:44 1997 Lars Magne Ingebrigtsen * gnus-xmas.el (gnus-xmas-window-edges): New function. * gnus-score.el (gnus-score-edit-current-scores): Don't select - window. + window. Sat Sep 27 12:52:31 1997 Hallvard B. Furuseth @@ -2708,10 +2774,10 @@ Sat Sep 27 09:22:15 1997 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-summary-pop-article): Force. * gnus-art.el (gnus-article-prepare): Push the article onto the - history. + history. * gnus-sum.el (gnus-summary-pop-article): Pop to the right - article. + article. * gnus-demon.el (gnus-demon-scan-news): Save excursion. @@ -2752,7 +2818,7 @@ Sat Sep 27 04:32:45 1997 Lars Magne Ingebrigtsen Sat Sep 27 03:50:12 1997 Lars Magne Ingebrigtsen * message.el (message-send): Post without asking. - (message-mode): Modify paragraphs-start and paragraph-separate. + (message-mode): Modify paragraphs-start and paragraph-separate. (message-newline-and-reformat): New command and keystroke. Thu Sep 25 00:13:41 1997 Lars Magne Ingebrigtsen @@ -2800,17 +2866,17 @@ Tue Sep 23 01:41:04 1997 Lars Magne Ingebrigtsen * dgnushack.el (dgnushack-compile): Check for cus-edit. * message.el (message-included-forward-headers): Include Mime - headers. + headers. (message-send): Allow posting without confirming from Agent. Mon Sep 22 05:43:14 1997 Lars Magne Ingebrigtsen * dgnushack.el (byte-compile-warnings): Don't warn about obsolete - variables. + variables. * gnus-sum.el (gnus-summary-refer-thread): New command and - keystroke. - (gnus-summary-limit-include-thread): New command and keystroke. + keystroke. + (gnus-summary-limit-include-thread): New command and keystroke. (gnus-summary-articles-in-thread): New function. (gnus-articles-in-thread): Renamed. @@ -2845,14 +2911,14 @@ Sun Sep 21 00:14:40 1997 Lars Magne Ingebrigtsen (gnus-current-prefix-symbols): New variable. * gnus-score.el (gnus-summary-increase-score): Take symbolic - prefix. + prefix. * gnus.el (gnus-interactive): Removed. (gnus-interactive): Renamed from gnus-interactive-1. (gnus-symbolic-argument): New command. * gnus-draft.el (gnus-draft-send-message): Disable message - checks. + checks. (gnus-draft-send): Ditto. (gnus-draft-setup): Don't save buffer. @@ -2861,7 +2927,7 @@ Sun Sep 21 00:14:40 1997 Lars Magne Ingebrigtsen * gnus-group.el (gnus-group-iterate): Use gensymmed variables. * pop3.el (pop3-md5): `with-temp-buffer' doesn't exist in Emacs - 19.34. + 19.34. * nneething.el (nneething-directory): Defvarred. @@ -2878,12 +2944,12 @@ Sun Sep 21 00:14:40 1997 Lars Magne Ingebrigtsen throughout. * gnus-sum.el (gnus-summary-edit-article): Supply additional - param. + param. * gnus-group.el (gnus-group-iterate): Undo bogus change. * gnus-agent.el (gnus-agentize): Just call gnus-open-agent - directly. + directly. * gnus.el (gnus-interactive): New macro. (gnus-interactive-1): New function. @@ -2950,12 +3016,12 @@ Thu Sep 18 03:33:54 1997 Lars Magne Ingebrigtsen * gnus-msg.el (gnus-setup-message): Slap a progn around forms. - * nndraft.el (nndraft-articles): Make sure directory exists. + * nndraft.el (nndraft-articles): Make sure directory exists. * message.el (message-mode): Don't delete article. * nnmh.el (nnmh-request-accept-article): Don't save when - noinsert. + noinsert. Wed Sep 17 03:37:59 1997 Lars Magne Ingebrigtsen @@ -2978,10 +3044,10 @@ Wed Sep 17 02:30:04 1997 Lars Magne Ingebrigtsen References. * gnus-agent.el (gnus-agent-fetch-group-1): Separated out into - function. + function. * message.el (message-delete-not-region): New command and - keystroke. + keystroke. Tue Sep 16 00:58:26 1997 Lars Magne Ingebrigtsen @@ -2994,7 +3060,7 @@ Tue Sep 16 00:58:26 1997 Lars Magne Ingebrigtsen * gnus-agent.el (gnus-agentize): Don't set twice. * gnus-art.el (gnus-article-prepare): Go to the right line before - marking. + marking. * gnus-start.el: Renamed the drafts group. @@ -3013,7 +3079,7 @@ Mon Sep 15 00:53:50 1997 Lars Magne Ingebrigtsen (gnus-get-newsgroup-headers): Ditto. * gnus-draft.el (gnus-group-send-drafts): Don't send when - unplugged. + unplugged. * gnus-sum.el (gnus-summary-read-group): Don't show-all when skipping groups. diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index f408833..68d11dd 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -456,12 +456,12 @@ Obsolete; use the face `gnus-signature-face' for customizations instead." (defface gnus-header-from-face '((((class color) (background dark)) - (:foreground "spring green" :bold t)) + (:foreground "spring green")) (((class color) (background light)) - (:foreground "red3" :bold t)) + (:foreground "red3")) (t - (:bold t :italic t))) + (:italic t))) "Face used for displaying from headers." :group 'gnus-article-headers :group 'gnus-article-highlight) @@ -469,10 +469,10 @@ Obsolete; use the face `gnus-signature-face' for customizations instead." (defface gnus-header-subject-face '((((class color) (background dark)) - (:foreground "SeaGreen3" :bold t)) + (:foreground "SeaGreen3")) (((class color) (background light)) - (:foreground "red4" :bold t)) + (:foreground "red4")) (t (:bold t :italic t))) "Face used for displaying subject headers." @@ -482,12 +482,12 @@ Obsolete; use the face `gnus-signature-face' for customizations instead." (defface gnus-header-newsgroups-face '((((class color) (background dark)) - (:foreground "yellow" :bold t :italic t)) + (:foreground "yellow" :italic t)) (((class color) (background light)) - (:foreground "MidnightBlue" :bold t :italic t)) + (:foreground "MidnightBlue" :italic t)) (t - (:bold t :italic t))) + (:italic t))) "Face used for displaying newsgroups headers." :group 'gnus-article-headers :group 'gnus-article-highlight) @@ -588,7 +588,7 @@ Initialized from `text-mode-syntax-table.") b e (cons 'article-type (cons type gnus-hidden-properties)))) (defun gnus-article-unhide-text-type (b e type) - "Hide text of TYPE between B and E." + "Unhide text of TYPE between B and E." (remove-text-properties b e (cons 'article-type (cons type gnus-hidden-properties))) (when (memq 'intangible gnus-hidden-properties) @@ -907,15 +907,19 @@ characters to translate to." (nnheader-narrow-to-headers) (setq from (message-fetch-field "from")) (goto-char (point-min)) - (while (and gnus-article-x-face-command - (or force - ;; Check whether this face is censored. - (not gnus-article-x-face-too-ugly) - (and gnus-article-x-face-too-ugly from - (not (string-match gnus-article-x-face-too-ugly - from)))) - ;; Has to be present. - (re-search-forward "^X-Face: " nil t)) + ;; This used to try to do multiple faces (`while' instead of + ;; `when' below), but (a) sending multiple EOFs to xv doesn't + ;; work (b) it can crash some versions of Emacs (c) are + ;; multiple faces really something to encourage? + (when (and gnus-article-x-face-command + (or force + ;; Check whether this face is censored. + (not gnus-article-x-face-too-ugly) + (and gnus-article-x-face-too-ugly from + (not (string-match gnus-article-x-face-too-ugly + from)))) + ;; Has to be present. + (re-search-forward "^X-Face: " nil t)) ;; We now have the area of the buffer where the X-Face is stored. (save-excursion (let ((beg (point)) @@ -958,27 +962,25 @@ always hide." (goto-char (point-min)) ;; Hide the "header". (when (search-forward "\n-----BEGIN PGP SIGNED MESSAGE-----\n" nil t) - (gnus-article-hide-text-type (1+ (match-beginning 0)) - (match-end 0) 'pgp) + (delete-region (1+ (match-beginning 0)) (match-end 0)) (setq beg (point)) ;; Hide the actual signature. (and (search-forward "\n-----BEGIN PGP SIGNATURE-----\n" nil t) (setq end (1+ (match-beginning 0))) - (gnus-article-hide-text-type + (delete-region end (if (search-forward "\n-----END PGP SIGNATURE-----\n" nil t) (match-end 0) ;; Perhaps we shouldn't hide to the end of the buffer ;; if there is no end to the signature? - (point-max)) - 'pgp)) + (point-max)))) ;; Hide "- " PGP quotation markers. (when (and beg end) (narrow-to-region beg end) (goto-char (point-min)) (while (re-search-forward "^- " nil t) - (gnus-article-hide-text-type - (match-beginning 0) (match-end 0) 'pgp)) + (delete-region + (match-beginning 0) (match-end 0))) (widen)) (gnus-run-hooks 'gnus-article-hide-pgp-hook)))))) @@ -1086,37 +1088,38 @@ always hide." (defun gnus-article-narrow-to-signature () "Narrow to the signature; return t if a signature is found, else nil." (widen) - (when (and (boundp 'mime::preview/content-list) - mime::preview/content-list) - ;; We have a MIMEish article, so we use the MIME data to narrow. - (let ((pcinfo (car (last mime::preview/content-list)))) - (ignore-errors - (narrow-to-region - (funcall (intern "mime::preview-content-info/point-min") pcinfo) - (point-max))))) - - (when (gnus-article-search-signature) - (forward-line 1) - ;; Check whether we have some limits to what we consider - ;; to be a signature. - (let ((limits (if (listp gnus-signature-limit) gnus-signature-limit - (list gnus-signature-limit))) - limit limited) - (while (setq limit (pop limits)) - (if (or (and (integerp limit) - (< (- (point-max) (point)) limit)) - (and (floatp limit) - (< (count-lines (point) (point-max)) limit)) - (and (gnus-functionp limit) - (funcall limit)) - (and (stringp limit) - (not (re-search-forward limit nil t)))) - () ; This limit did not succeed. - (setq limited t - limits nil))) - (unless limited - (narrow-to-region (point) (point-max)) - t)))) + (let ((inhibit-point-motion-hooks t)) + (when (and (boundp 'mime::preview/content-list) + mime::preview/content-list) + ;; We have a MIMEish article, so we use the MIME data to narrow. + (let ((pcinfo (car (last mime::preview/content-list)))) + (ignore-errors + (narrow-to-region + (funcall (intern "mime::preview-content-info/point-min") pcinfo) + (point-max))))) + + (when (gnus-article-search-signature) + (forward-line 1) + ;; Check whether we have some limits to what we consider + ;; to be a signature. + (let ((limits (if (listp gnus-signature-limit) gnus-signature-limit + (list gnus-signature-limit))) + limit limited) + (while (setq limit (pop limits)) + (if (or (and (integerp limit) + (< (- (point-max) (point)) limit)) + (and (floatp limit) + (< (count-lines (point) (point-max)) limit)) + (and (gnus-functionp limit) + (funcall limit)) + (and (stringp limit) + (not (re-search-forward limit nil t)))) + () ; This limit did not succeed. + (setq limited t + limits nil))) + (unless limited + (narrow-to-region (point) (point-max)) + t))))) (defun gnus-article-search-signature () "Search the current buffer for the signature separator. @@ -1409,7 +1412,7 @@ is to run." (unless n (setq n 1)) (gnus-stop-date-timer) - (setq article-lapsed-timer + (setq article-lapsed-timer (nnheader-run-at-time 1 n 'article-update-date-lapsed))) (defun gnus-stop-date-timer () @@ -1891,9 +1894,9 @@ commands: (use-local-map gnus-article-mode-map) (gnus-update-format-specifications nil 'article-mode) (set (make-local-variable 'page-delimiter) gnus-page-delimiter) - (make-local-variable 'gnus-page-broken) - (make-local-variable 'gnus-button-marker-list) - (make-local-variable 'gnus-article-current-summary) + (make-local-variable 'gnus-page-broken) + (make-local-variable 'gnus-button-marker-list) + (make-local-variable 'gnus-article-current-summary) (gnus-set-default-directory) (buffer-disable-undo (current-buffer)) (setq buffer-read-only t) @@ -2038,7 +2041,7 @@ If ALL-HEADERS is non-nil, no headers are hidden." (message "Message marked for downloading")) (gnus-summary-mark-article article gnus-canceled-mark) (unless (memq article gnus-newsgroup-sparse) - (gnus-error 1 + (gnus-error 1 "No such article (may have expired or been canceled)"))))) (if (or (eq result 'pseudo) (eq result 'nneething)) (progn @@ -2119,6 +2122,8 @@ If ALL-HEADERS is non-nil, no headers are hidden." (gnus-set-mode-line 'article) (gnus-configure-windows 'article) (goto-char (point-min)) + (search-forward "\n\n" nil t) + (set-window-point (get-buffer-window (current-buffer)) (point)) t)))))) (defun gnus-article-wash-status () @@ -2143,7 +2148,9 @@ If ALL-HEADERS is non-nil, no headers are hidden." (if mime ?m ? ) (if emphasis ?e ? ))))) -(defun gnus-article-hide-headers-if-wanted () +(fset 'gnus-article-hide-headers-if-wanted 'gnus-article-maybe-hide-headers) + +(defun gnus-article-maybe-hide-headers () "Hide unwanted headers if `gnus-have-all-headers' is nil. Provided for backwards compatibility." (or (save-excursion (set-buffer gnus-summary-buffer) gnus-have-all-headers) @@ -2504,6 +2511,27 @@ 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) + (equal (buffer-name (current-buffer)) + (buffer-name (get-buffer gnus-article-buffer)))) + (save-excursion + (if (get-buffer gnus-original-article-buffer) + (set-buffer gnus-original-article-buffer) + (set-buffer (get-buffer-create gnus-original-article-buffer)) + (buffer-disable-undo (current-buffer)) + (setq major-mode 'gnus-original-article-mode) + (setq buffer-read-only t) + (gnus-add-current-to-buffer-list)) + (let (buffer-read-only) + (erase-buffer) + (insert-buffer-substring gnus-article-buffer)) + (setq gnus-original-article (cons group article)))) + ;; Update sparse articles. (when (and do-update-line (or (numberp article) @@ -2577,6 +2605,7 @@ groups." (let ((winconf (current-window-configuration))) (set-buffer gnus-article-buffer) (gnus-article-edit-mode) + (gnus-article-delete-text-of-type 'annotation) (gnus-set-text-properties (point-min) (point-max) nil) (gnus-configure-windows 'edit-article) (setq gnus-article-edit-done-function exit-func) @@ -3178,7 +3207,8 @@ forbidden in URL encoding." (gnus-eval-format gnus-prev-page-line-format nil `(gnus-prev t local-map ,gnus-prev-page-map - gnus-callback gnus-article-button-prev-page)))) + gnus-callback gnus-article-button-prev-page + gnus-type annotation)))) (defvar gnus-next-page-map nil) (unless gnus-next-page-map @@ -3206,9 +3236,10 @@ forbidden in URL encoding." (defun gnus-insert-next-page-button () (let ((buffer-read-only nil)) (gnus-eval-format gnus-next-page-line-format nil - `(gnus-next t local-map ,gnus-next-page-map - gnus-callback - gnus-article-button-next-page)))) + `(gnus-next + t local-map ,gnus-next-page-map + gnus-callback gnus-article-button-next-page + gnus-type annotation)))) (defun gnus-article-button-next-page (arg) "Go to the next page." diff --git a/lisp/gnus-cite.el b/lisp/gnus-cite.el index 3ab06cc..5710910 100644 --- a/lisp/gnus-cite.el +++ b/lisp/gnus-cite.el @@ -47,8 +47,13 @@ article has citations." :type '(choice (const :tag "no" nil) (const :tag "yes" t))) -(defcustom gnus-cited-text-button-line-format "%(%{[...]%}%)\n" - "Format of cited text buttons." +(defcustom gnus-cited-opened-text-button-line-format "%(%{[-]%}%)\n" + "Format of opened cited text buttons." + :group 'gnus-cite + :type 'string) + +(defcustom gnus-cited-closed-text-button-line-format "%(%{[+]%}%)\n" + "Format of closed cited text buttons." :group 'gnus-cite :type 'string) @@ -95,7 +100,7 @@ The first regexp group should match the Supercite attribution." :group 'gnus-cite :type 'integer) -(defcustom gnus-cite-attribution-prefix +(defcustom gnus-cite-attribution-prefix "In article\\|in <\\|On \\(Mon\\|Tue\\|Wed\\|Thu\\|Fri\\|Sat\\|Sun\\)," "*Regexp matching the beginning of an attribution line." :group 'gnus-cite @@ -109,7 +114,7 @@ The text matching the first grouping will be used as a button." :type 'regexp) (defface gnus-cite-attribution-face '((t - (:underline t))) + (:italic t))) "Face used for attribution lines.") (defcustom gnus-cite-attribution-face 'gnus-cite-attribution-face @@ -276,11 +281,15 @@ This should make it easier to see who wrote what." ;; PREFIX: Is the citation prefix of the attribution line(s), and ;; TAG: Is a Supercite tag, if any. -(defvar gnus-cited-text-button-line-format-alist +(defvar gnus-cited-opened-text-button-line-format-alist `((?b (marker-position beg) ?d) (?e (marker-position end) ?d) (?l (- end beg) ?d))) -(defvar gnus-cited-text-button-line-format-spec nil) +(defvar gnus-cited-opened-text-button-line-format-spec nil) +(defvar gnus-cited-closed-text-button-line-format-alist + gnus-cited-opened-text-button-line-format-alist) +(defvar gnus-cited-closed-text-button-line-format-spec nil) + ;;; Commands: @@ -445,7 +454,8 @@ See the documentation for `gnus-article-highlight-citation'. If given a negative prefix, always show; if given a positive prefix, always hide." (interactive (append (gnus-article-hidden-arg) (list 'force))) - (gnus-set-format 'cited-text-button t) + (gnus-set-format 'cited-opened-text-button t) + (gnus-set-format 'cited-closed-text-button t) (save-excursion (set-buffer gnus-article-buffer) (cond @@ -460,7 +470,7 @@ always hide." (inhibit-point-motion-hooks t) (props (nconc (list 'article-type 'cite) gnus-hidden-properties)) - beg end) + beg end start) (while marks (setq beg nil end nil) @@ -489,26 +499,49 @@ always hide." (unless (save-excursion (search-backward "\n\n" nil t)) (insert "\n")) (put-text-property - (point) + (setq start (point-marker)) (progn (gnus-article-add-button (point) - (progn (eval gnus-cited-text-button-line-format-spec) (point)) + (progn (eval gnus-cited-closed-text-button-line-format-spec) + (point)) `gnus-article-toggle-cited-text - (cons beg end)) + (list (cons beg end) start)) (point)) 'article-type 'annotation) (set-marker beg (point))))))))) -(defun gnus-article-toggle-cited-text (region) +(defun gnus-article-toggle-cited-text (args) "Toggle hiding the text in REGION." - (let (buffer-read-only) - (funcall - (if (text-property-any - (car region) (1- (cdr region)) - (car gnus-hidden-properties) (cadr gnus-hidden-properties)) + (let* ((region (car args)) + (start (cadr args)) + (hidden + (text-property-any + (car region) (1- (cdr region)) + (car gnus-hidden-properties) (cadr gnus-hidden-properties))) + (inhibit-point-motion-hooks t) + buffer-read-only) + (funcall + (if hidden 'remove-text-properties 'gnus-add-text-properties) - (car region) (cdr region) gnus-hidden-properties))) + (car region) (cdr region) gnus-hidden-properties) + (save-excursion + (goto-char start) + (gnus-delete-line) + (put-text-property + (point) + (progn + (gnus-article-add-button + (point) + (progn (eval + (if hidden + gnus-cited-opened-text-button-line-format-spec + gnus-cited-closed-text-button-line-format-spec)) + (point)) + `gnus-article-toggle-cited-text + args) + (point)) + 'article-type 'annotation)))) (defun gnus-article-hide-citation-maybe (&optional arg force) "Toggle hiding of cited text that has an attribution line. diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el index f79b976..f36e177 100644 --- a/lisp/gnus-group.el +++ b/lisp/gnus-group.el @@ -1472,7 +1472,7 @@ and with point over the group in question." (save-selected-window (save-excursion (funcall ,function ,group))))))))) - + (put 'gnus-group-iterate 'lisp-indent-function 1) ;; Selecting groups. @@ -1900,6 +1900,8 @@ and NEW-NAME will be prompted for." (gnus-set-active new-name (gnus-active group)) (gnus-message 6 "Renaming group %s to %s...done" group new-name) new-name) + (setq gnus-killed-list (delete group gnus-killed-list)) + (gnus-set-active group nil) (gnus-dribble-touch) (gnus-group-position-point))) @@ -3021,6 +3023,7 @@ to use." (lambda (group) (and (symbol-name group) (string-match regexp (symbol-name group)) + (symbol-value group) (push (symbol-name group) groups))) gnus-active-hashtb) ;; Also go through all descriptions that are known to Gnus. @@ -3121,12 +3124,14 @@ group." (defun gnus-group-find-new-groups (&optional arg) "Search for new groups and add them. Each new group will be treated with `gnus-subscribe-newsgroup-method.' -If ARG (the prefix), use the `ask-server' method to query -the server for new groups." - (interactive "P") - (gnus-find-new-newsgroups arg) +With 1 C-u, use the `ask-server' method to query the server for new +groups. +With 2 C-u's, use most complete method possible to query the server +for new groups, and subscribe the new groups as zombies." + (interactive "p") + (gnus-find-new-newsgroups (or arg 1)) (gnus-group-list-groups)) - + (defun gnus-group-edit-global-kill (&optional article group) "Edit the global kill file. If GROUP, edit that local kill file instead." diff --git a/lisp/gnus-int.el b/lisp/gnus-int.el index 6a641aa..6eff329 100644 --- a/lisp/gnus-int.el +++ b/lisp/gnus-int.el @@ -149,6 +149,8 @@ If it is down, start it up (again)." (cdr method-fnlist-elt)))) ;; Maybe complain if there is no function. (unless (fboundp func) + (unless (car method) + (error "Trying to require a method that doesn't exist")) (require (car method)) (when (not (fboundp func)) (if noerror diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el index 3ddba88..a95d696 100644 --- a/lisp/gnus-start.el +++ b/lisp/gnus-start.el @@ -940,13 +940,25 @@ If LEVEL is non-nil, the news will be set up at level LEVEL." "Search for new newsgroups and add them. Each new newsgroup will be treated with `gnus-subscribe-newsgroup-method.' The `-n' option line from .newsrc is respected. -If ARG (the prefix), use the `ask-server' method to query the server -for new groups." - (interactive "P") - (let ((check (if (or (and arg (not (listp gnus-check-new-newsgroups))) - (null gnus-read-active-file) - (eq gnus-read-active-file 'some)) - 'ask-server gnus-check-new-newsgroups))) + +With 1 C-u, use the `ask-server' method to query the server for new +groups. +With 2 C-u's, use most complete method possible to query the server +for new groups, and subscribe the new groups as zombies." + (interactive "p") + (let* ((gnus-subscribe-newsgroup-method + gnus-subscribe-newsgroup-method) + (check (cond + ((or (and (= (or arg 1) 4) + (not (listp gnus-check-new-newsgroups))) + (null gnus-read-active-file) + (eq gnus-read-active-file 'some)) + 'ask-server) + ((= (or arg 1) 16) + (setq gnus-subscribe-newsgroup-method + 'gnus-subscribe-zombies) + t) + (t gnus-check-new-newsgroups)))) (unless (gnus-check-first-time-used) (if (or (consp check) (eq check 'ask-server)) diff --git a/lisp/gnus.el b/lisp/gnus.el index 15f1a7b..5bb255e 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -253,11 +253,11 @@ is restarted, and sometimes reloaded." (defconst gnus-product-name "T-gnus" "Product name of this version of gnus.") -(defconst gnus-version-number "6.8.9" +(defconst gnus-version-number "6.8.10" "Version number for this version of gnus.") (defconst gnus-version - (format "%s %s (based on Gnus 5.6.31; for SEMI 1.8, FLIM 1.8/1.9)" + (format "%s %s (based on Gnus 5.6.33; for SEMI 1.8, FLIM 1.8/1.9)" gnus-product-name gnus-version-number) "Version string for this version of gnus.") @@ -1425,10 +1425,10 @@ want." (defvar gnus-predefined-server-alist `(("cache" nnspool "cache" - (nnspool-spool-directory gnus-cache-directory) - (nnspool-nov-directory gnus-cache-directory) + (nnspool-spool-directory ,gnus-cache-directory) + (nnspool-nov-directory ,gnus-cache-directory) (nnspool-active-file - (nnheader-concat gnus-cache-directory "active")))) + ,(nnheader-concat gnus-cache-directory "active")))) "List of predefined (convenience) servers.") (defvar gnus-topic-indentation "") ;; Obsolete variable. @@ -1961,16 +1961,6 @@ If ARG, insert string at point." (let ((methods gnus-valid-select-methods) (mess gnus-version) meth) - ;; Go through all the legal select methods and add their version - ;; numbers to the total version string. Only the backends that are - ;; currently in use will have their message numbers taken into - ;; consideration. - (while methods - (setq meth (intern (concat (caar methods) "-version"))) - (and (boundp meth) - (stringp (symbol-value meth)) - (setq mess (concat mess "; " (symbol-value meth)))) - (setq methods (cdr methods))) (if arg (insert (message mess)) (message mess)))) diff --git a/lisp/nndoc.el b/lisp/nndoc.el index 2217d13..79ad7ad 100644 --- a/lisp/nndoc.el +++ b/lisp/nndoc.el @@ -74,9 +74,6 @@ from the document.") (article-begin . "^--.*\n+") (body-end . "^--.*$") (prepare-body-function . nndoc-unquote-dashes)) - (mime-parts - (generate-head-function . nndoc-generate-mime-parts-head) - (article-transform-function . nndoc-transform-mime-parts)) (clari-briefs (article-begin . "^ \\*") (body-end . "^\t------*[ \t]^*\n^ \\*") @@ -90,6 +87,9 @@ from the document.") (body-end . "") (file-end . "") (subtype digest guess)) + (mime-parts + (generate-head-function . nndoc-generate-mime-parts-head) + (article-transform-function . nndoc-transform-mime-parts)) (standard-digest (first-article . ,(concat "^" (make-string 70 ?-) "\n *\n+")) (article-begin . ,(concat "^\n" (make-string 30 ?-) "\n *\n+")) diff --git a/texi/ChangeLog b/texi/ChangeLog index c2a8230..735b586 100644 --- a/texi/ChangeLog +++ b/texi/ChangeLog @@ -1,3 +1,18 @@ +1998-08-11 20:33:53 Justin Zaglio + + * gnus.texi (Group Maintenance): Fix. + +1998-08-11 11:44:20 Lars Magne Ingebrigtsen + + * gnus.texi (Group Maintenance): Fix. + +1998-08-10 08:59:25 Lars Magne Ingebrigtsen + + * gnus.texi (Article Highlighting): Addition. + (Article Fontisizing): Fix. + (Article Hiding): Change. + (Article Hiding): Fix. + 1998-08-09 15:32:24 Lars Magne Ingebrigtsen * gnus.texi (Hiding Headers): Fix. @@ -334,7 +349,7 @@ Sat Sep 20 20:53:43 1997 Lars Magne Ingebrigtsen Wed Sep 17 02:32:56 1997 Lars Magne Ingebrigtsen - * gnus.texi (Customizing Threading): Broken up into five nodes. + * gnus.texi (Customizing Threading): Broken up into five nodes. (Article Washing): Addition. * message.texi (Various Commands): Add. @@ -361,7 +376,7 @@ Sat Jul 19 23:02:03 1997 Lars Magne Ingebrigtsen Sat Jul 12 16:29:35 1997 Lars Magne Ingebrigtsen - * gnus.texi (Picon Configuration): Moved Picons to under XEmacs. + * gnus.texi (Picon Configuration): Moved Picons to under XEmacs. (Smileys): New section. Fri Jul 11 11:58:20 1997 Lars Magne Ingebrigtsen @@ -543,7 +558,7 @@ Mon Feb 3 07:31:47 1997 Lars Magne Ingebrigtsen Mon Jan 27 17:51:29 1997 Lars Magne Ingebrigtsen * gnus.texi (Highlighting and Menus): Removed - `gnus-display-type'. + `gnus-display-type'. Sat Jan 25 08:09:30 1997 Lars Magne Ingebrigtsen @@ -666,7 +681,7 @@ Fri Oct 25 09:04:59 1996 Lars Magne Ingebrigtsen Wed Oct 23 08:28:29 1996 Hrvoje Niksic - * gnus.texi (Fancy Mail Splitting): Removed trailing garbage. + * gnus.texi (Fancy Mail Splitting): Removed trailing garbage. Tue Oct 22 07:36:02 1996 Lars Magne Ingebrigtsen @@ -944,4 +959,3 @@ Mon Jul 29 10:12:24 1996 Lars Magne Ingebrigtsen (Advanced Scoring Example): New. (Advanced Scoring Syntax): New. (Advanced Scoring): New. - diff --git a/texi/gnus.texi b/texi/gnus.texi index 0cf2a5f..3dbed6a 100644 --- a/texi/gnus.texi +++ b/texi/gnus.texi @@ -1,7 +1,7 @@ \input texinfo @c -*-texinfo-*- @setfilename gnus -@settitle Semi-gnus 6.8.9 Manual +@settitle Semi-gnus 6.8.10 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -316,7 +316,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Semi-gnus 6.8.9 Manual +@title Semi-gnus 6.8.10 Manual @author by Lars Magne Ingebrigtsen @page @@ -359,7 +359,7 @@ internationalization/localization and multiscript features based on MULE API. So Semi-gnus does not discriminate various language communities. Oh, if you are a Klingon, please wait Unicode Next Generation. -This manual corresponds to Semi-gnus 6.8.9. +This manual corresponds to Semi-gnus 6.8.10. @end ifinfo @@ -2390,8 +2390,10 @@ Find bogus groups and delete them @kindex F (Group) @findex gnus-group-find-new-groups Find new groups and process them (@code{gnus-group-find-new-groups}). -If given a prefix, use the @code{ask-server} method to query the server -for new groups. +With 1 @kbd{C-u}, use the @code{ask-server} method to query the server +for new groups. With 2 @kbd{C-u}'s, use most complete method possible +to query the server for new groups, and subscribe the new groups as +zombies. @item C-c C-x @kindex C-c C-x (Group) @@ -6073,17 +6075,25 @@ these articles easier. @node Article Highlighting @subsection Article Highlighting -@cindex highlight +@cindex highlighting Not only do you want your article buffer to look like fruit salad, but -you want it to look like technicolor fruit salad. +you want it to look like technicolor fruit salad. @table @kbd @item W H a @kindex W H a (Summary) @findex gnus-article-highlight -Highlight the current article (@code{gnus-article-highlight}). +@findex gnus-article-maybe-highlight +Do much highlighting of the current article +(@code{gnus-article-highlight}). This function highlights header, cited +text, the signature, and adds buttons to the body and the head. + +Most users would prefer using @code{gnus-article-maybe-highlight} in +@code{gnus-article-display-hook} (@pxref{Customizing Articles}) instead. +This is a bit less agressive---it highlights only the headers, the +signature and adds buttons. @item W H h @kindex W H h (Summary) @@ -6169,6 +6179,8 @@ default. @end table +@xref{Customizing Articles} for how to highlight articles automatically. + @node Article Fontisizing @subsection Article Fontisizing @@ -6182,9 +6194,9 @@ like @samp{_this_} or @samp{*this*}. Gnus can make this look nicer by running the article through the @kbd{W e} (@code{gnus-article-emphasize}) command. -@vindex gnus-article-emphasis +@vindex gnus-emphasis-alist How the emphasis is computed is controlled by the -@code{gnus-article-emphasis} variable. This is an alist where the first +@code{gnus-emphasis-alist} variable. This is an alist where the first element is a regular expression to be matched. The second is a number that says what regular expression grouping is used to find the entire emphasized word. The third is a number that says what regexp grouping @@ -6221,6 +6233,8 @@ say something like: (copy-face 'red 'gnus-emphasis-italic) @end lisp +@xref{Customizing Articles} for how to fontize articles automatically. + @node Article Hiding @subsection Article Hiding @@ -6234,7 +6248,7 @@ too much cruft in most articles. @item W W a @kindex W W a (Summary) @findex gnus-article-hide -Do quote a lot of hiding on the article buffer +Do quite a lot of hiding on the article buffer (@kbd{gnus-article-hide}). In particular, this function will hide headers, PGP, cited text and the signature. @@ -6278,11 +6292,13 @@ customizing the hiding: @table @code -@item gnus-cited-text-button-line-format -@vindex gnus-cited-text-button-line-format +@item gnus-cited-opened-text-button-line-format +@itemx gnus-cited-closed-text-button-line-format +@vindex gnus-cited-closed-text-button-line-format +@vindex gnus-cited-opened-text-button-line-format Gnus adds buttons to show where the cited text has been hidden, and to allow toggle hiding the text. The format of the variable is specified -by this format-like variable (@pxref{Formatting Variables}). These +by these format-like variable (@pxref{Formatting Variables}). These specs are valid: @table @samp @@ -6336,6 +6352,9 @@ hidden. If you give a positive prefix, they will always hide. Also @pxref{Article Highlighting} for further variables for citation customization. +@xref{Customizing Articles} for how to hide article elements +automatically. + @node Article Washing @subsection Article Washing @@ -6495,6 +6514,8 @@ body (@code{gnus-article-strip-leading-space}). @end table +@xref{Customizing Articles} for how to wash articles automatically. + @node Article Buttons @subsection Article Buttons @@ -6579,6 +6600,8 @@ Face used when the mouse cursor is over a button. @end table +@xref{Customizing Articles} for how to buttonize articles automatically. + @node Article Date @subsection Article Date @@ -6646,6 +6669,9 @@ that the article was posted in 1854. Although something like that is @end table +@xref{Customizing Articles} for how to display the date in your +preferred format automatically. + @node Article Signature @subsection Article Signature @@ -7874,9 +7900,12 @@ been inserted into the article buffer. It is meant to handle all treatment of the article before it is displayed. @findex gnus-article-maybe-highlight -By default this hook just contains @code{gnus-article-hide-headers}, -@code{gnus-article-treat-overstrike}, and -@code{gnus-article-maybe-highlight}, but there are thousands, nay +@findex gnus-article-maybe-hide-headers +By default this hook just contains +@code{gnus-article-maybe-hide-headers}, +@code{gnus-hide-boring-headers}, @code{gnus-article-treat-overstrike}, +and @code{gnus-article-maybe-highlight} (and under XEmacs, +@code{gnus-article-display-x-face}), but there are thousands, nay millions, of functions you can put in this hook. For an overview of functions @pxref{Article Highlighting}, @pxref{Article Hiding}, @pxref{Article Washing}, @pxref{Article Buttons} and @pxref{Article @@ -9662,6 +9691,9 @@ element is @code{:}, then the second element will be called as a function with @var{args} given as arguments. The function should return a SPLIT. +@item +@code{nil}: If the split is @code{nil}, it is ignored. + @end enumerate In these splits, @var{FIELD} must match a complete field name. @@ -15403,7 +15435,7 @@ On July 28th 1996 work on Red Gnus was begun, and it was released on January 25th 1997 (after 84 releases) as ``Gnus 5.4'' (67 releases). On September 13th 1997, Quassia Gnus was started and lasted 37 -releases. If was released as ``Gnus 5.6.31' on March 8th 1998. +releases. If was released as ``Gnus 5.6.33' on March 8th 1998. If you happen upon a version of Gnus that has a prefixed name -- ``(ding) Gnus'', ``September Gnus'', ``Red Gnus'', ``Quassia Gnus'' -- @@ -15880,7 +15912,7 @@ actually are people who are using Gnus. Who'd'a thunk it! * ding Gnus:: New things in Gnus 5.0/5.1, the first new Gnus. * September Gnus:: The Thing Formally Known As Gnus 5.3/5.3. * Red Gnus:: Third time best---Gnus 5.4/5.5. -* Quassia Gnus:: Two times two is four, or Gnus 5.6.31. +* Quassia Gnus:: Two times two is four, or Gnus 5.6.33. @end menu These lists are, of course, just @emph{short} overviews of the @@ -16415,7 +16447,7 @@ Emphasized text can be properly fontisized: @node Quassia Gnus @subsubsection Quassia Gnus -New features in Gnus 5.6.31: +New features in Gnus 5.6.33: @itemize @bullet @@ -16641,8 +16673,6 @@ articles aren't displayed. @item nndoc should always allocate unique Message-IDs. @item - implement gnus-score-thread -@item If there are mail groups the first time you use Gnus, Gnus'll make the mail groups killed. @item diff --git a/texi/message.texi b/texi/message.texi index 8ca860a..398285f 100644 --- a/texi/message.texi +++ b/texi/message.texi @@ -1,7 +1,7 @@ \input texinfo @c -*-texinfo-*- @setfilename message -@settitle Message 5.6.31 Manual +@settitle Message 5.6.33 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -42,7 +42,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Message 5.6.31 Manual +@title Message 5.6.33 Manual @author by Lars Magne Ingebrigtsen @page @@ -83,7 +83,7 @@ Message mode buffers. * Key Index:: List of Message mode keys. @end menu -This manual corresponds to Message 5.6.31. Message is distributed with +This manual corresponds to Message 5.6.33. Message is distributed with the Gnus distribution bearing the same version number as this manual has. -- 1.7.10.4