* [patch] Small enhancements for gnus-sum.el
@ 2001-12-03 0:28 Frank Schmitt
2001-12-03 7:48 ` Kai Großjohann
` (2 more replies)
0 siblings, 3 replies; 9+ messages in thread
From: Frank Schmitt @ 2001-12-03 0:28 UTC (permalink / raw)
[-- Attachment #1: Type: text/plain, Size: 1043 bytes --]
Hi all.
I did three (In my eyes) enhancements in gnus-sum.el:
1) The menu including the gnus-summary-limit-to-* functions was called
"Mark Limit". This is most certainly not the name it is supposed to have
and if it is, I think it is not very telling. I therefor changed it to
"Limit to".
2) There is no predefined shortcut for gnus-article-show-raw-article. I
think the shortcut belongs in gnus-summary-article-map but as r and R
are already in use, I assigned the function to w, so A w in the summary
buffer no calls gnus-article-show-raw-article.
3) When you call gnus-summary-limit-to-age via /t or the menu, you can
only limit the summary to articles older than x days. The user is asked
for x and if he gives a negative value nothing happens. I changed this,
so when the user says -x the summary is limited to articles younger than
x days. (e.g. /t -2 did nothing before and now limits the summary to
articles from today and yesterday)
If you like those changes, could someone commit the following patch?
(I've signed the papers)
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: patch against gnus-sum.el --]
[-- Type: text/x-patch, Size: 1142 bytes --]
--- gnus-sum.el Mon Dec 3 00:06:30 2001
+++ gnus-sum.el.new Mon Dec 3 00:04:32 2001
@@ -1695,7 +1695,8 @@
"s" gnus-summary-isearch-article
"P" gnus-summary-print-article
"M" gnus-mailing-list-insinuate
- "t" gnus-article-babel)
+ "t" gnus-article-babel
+ "w" gnus-summary-show-raw-article)
(gnus-define-keys (gnus-summary-wash-map "W" gnus-summary-mode-map)
"b" gnus-article-add-buttons
@@ -2082,7 +2083,7 @@
["Set expirable mark" gnus-summary-mark-as-expirable t]
["Set bookmark" gnus-summary-set-bookmark t]
["Remove bookmark" gnus-summary-remove-bookmark t])
- ("Mark Limit"
+ ("Limit to"
["Marks..." gnus-summary-limit-to-marks t]
["Subject..." gnus-summary-limit-to-subject t]
["Author..." gnus-summary-limit-to-author t]
@@ -6885,7 +6886,12 @@
(when (> (length days) 0)
(setq days (read days)))
(if (numberp days)
- (setq days-got t)
+ (progn
+ (setq days-got t)
+ (if (< days 0)
+ (progn
+ (setq younger (not younger))
+ (setq days (* days -1)))))
(message "Please enter a number.")
(sleep-for 1)))
(list days younger)))
[-- Attachment #3: Type: text/plain, Size: 175 bytes --]
--
One Ring to rule them all, One Ring to find them,
One Ring to bring them all and in the darkness bind them
In the Land of Mordor where the Shadows lie.
19. Dezember 2001
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: [patch] Small enhancements for gnus-sum.el
2001-12-03 0:28 [patch] Small enhancements for gnus-sum.el Frank Schmitt
@ 2001-12-03 7:48 ` Kai Großjohann
2001-12-03 10:16 ` Frank Schmitt
2001-12-07 16:23 ` Frank Schmitt
2001-12-29 2:20 ` Lars Magne Ingebrigtsen
2 siblings, 1 reply; 9+ messages in thread
From: Kai Großjohann @ 2001-12-03 7:48 UTC (permalink / raw)
Cc: ding
Frank Schmitt <usereplyto@Frank-Schmitt.net> writes:
> 1) The menu including the gnus-summary-limit-to-* functions was called
> "Mark Limit". This is most certainly not the name it is supposed to have
> and if it is, I think it is not very telling. I therefor changed it to
> "Limit to".
That's a good idea.
> 2) There is no predefined shortcut for gnus-article-show-raw-article. I
> think the shortcut belongs in gnus-summary-article-map but as r and R
> are already in use, I assigned the function to w, so A w in the summary
> buffer no calls gnus-article-show-raw-article.
Is `A w' in any way different than `C-u g'?
> 3) When you call gnus-summary-limit-to-age via /t or the menu, you can
> only limit the summary to articles older than x days. The user is asked
> for x and if he gives a negative value nothing happens. I changed this,
> so when the user says -x the summary is limited to articles younger than
> x days. (e.g. /t -2 did nothing before and now limits the summary to
> articles from today and yesterday)
Good idea. But what happens when the user types C-u / t - 2 RET?
Both the C-u and the - say to reverse the age constraint...
Not sure if it makes sense to remove the support for C-u.
kai
--
Simplification good! Oversimplification bad! (Larry Wall)
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: [patch] Small enhancements for gnus-sum.el
2001-12-03 7:48 ` Kai Großjohann
@ 2001-12-03 10:16 ` Frank Schmitt
0 siblings, 0 replies; 9+ messages in thread
From: Frank Schmitt @ 2001-12-03 10:16 UTC (permalink / raw)
Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai Großjohann) writes:
>>2) There is no predefined shortcut for gnus-article-show-raw-article. I
>>think the shortcut belongs in gnus-summary-article-map but as r and R
>>are already in use, I assigned the function to w, so A w in the summary
>>buffer no calls gnus-article-show-raw-article.
>
>Is `A w' in any way different than `C-u g'?
No, but I think it's nice for those who don't know that c-u g does
display the raw article (you have to look in the sources to know this)
to see the shortcut in the menu. (There is already a menu entry for raw
article and it's one of the *very* few without a shortcut.)
>>3) When you call gnus-summary-limit-to-age via /t or the menu, you can
>>only limit the summary to articles older than x days. The user is asked
>>for x and if he gives a negative value nothing happens. I changed this,
>>so when the user says -x the summary is limited to articles younger than
>>x days. (e.g. /t -2 did nothing before and now limits the summary to
>>articles from today and yesterday)
>
>Good idea. But what happens when the user types C-u / t - 2 RET?
>Both the C-u and the - say to reverse the age constraint...
>
>Not sure if it makes sense to remove the support for C-u.
Well, my thought was older than -2 days means younger than 2 and younger
than -2 means older than two. (When I first used /t I wanted articles
younger than x days and was very surprised that -x did nor have the
affect I wanted.)
In fact that doesn't remove the C-u support but adds a second
option. Once again: A negative argument didn't do anything before and it
just seems logical to me to replace younger with older and vice-versa
if a negative argument is specified.
--
One Ring to rule them all, One Ring to find them,
One Ring to bring them all and in the darkness bind them
In the Land of Mordor where the Shadows lie.
19. Dezember 2001
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: [patch] Small enhancements for gnus-sum.el
2001-12-03 0:28 [patch] Small enhancements for gnus-sum.el Frank Schmitt
2001-12-03 7:48 ` Kai Großjohann
@ 2001-12-07 16:23 ` Frank Schmitt
2001-12-29 2:20 ` Lars Magne Ingebrigtsen
2 siblings, 0 replies; 9+ messages in thread
From: Frank Schmitt @ 2001-12-07 16:23 UTC (permalink / raw)
Frank Schmitt <usereplyto@Frank-Schmitt.net> writes:
Well, how about including at least the Mark Limit -> Limit to part? (And
I still don't really see the problem with the other ones.)
--
One Ring to rule them all, One Ring to find them,
One Ring to bring them all and in the darkness bind them
In the Land of Mordor where the Shadows lie.
19. Dezember 2001
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: [patch] Small enhancements for gnus-sum.el
2001-12-03 0:28 [patch] Small enhancements for gnus-sum.el Frank Schmitt
2001-12-03 7:48 ` Kai Großjohann
2001-12-07 16:23 ` Frank Schmitt
@ 2001-12-29 2:20 ` Lars Magne Ingebrigtsen
2002-01-02 14:15 ` Per Abrahamsen
2 siblings, 1 reply; 9+ messages in thread
From: Lars Magne Ingebrigtsen @ 2001-12-29 2:20 UTC (permalink / raw)
Frank Schmitt <usereplyto@Frank-Schmitt.net> writes:
> 1) The menu including the gnus-summary-limit-to-* functions was called
> "Mark Limit". This is most certainly not the name it is supposed to have
> and if it is, I think it is not very telling. I therefor changed it to
> "Limit to".
[...]
> 3) When you call gnus-summary-limit-to-age via /t or the menu, you can
> only limit the summary to articles older than x days. The user is asked
> for x and if he gives a negative value nothing happens. I changed this,
> so when the user says -x the summary is limited to articles younger than
> x days. (e.g. /t -2 did nothing before and now limits the summary to
> articles from today and yesterday)
Thanks; I've applied these two patches...
> 2) There is no predefined shortcut for gnus-article-show-raw-article. I
> think the shortcut belongs in gnus-summary-article-map but as r and R
> are already in use, I assigned the function to w, so A w in the summary
> buffer no calls gnus-article-show-raw-article.
That command only exists so that something could be put into the
menus. People are supposed to hit `C-u g' to get the raw article if
they are using the keyboard. Unfortunately, the Emacs menu interface
isn't flexible enough to allow putting `C-u g' into the menu shortcut
thingie...
--
(domestic pets only, the antidote for overdose, milk.)
larsi@gnus.org * Lars Magne Ingebrigtsen
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: [patch] Small enhancements for gnus-sum.el
2001-12-29 2:20 ` Lars Magne Ingebrigtsen
@ 2002-01-02 14:15 ` Per Abrahamsen
2002-01-02 14:20 ` Lars Magne Ingebrigtsen
0 siblings, 1 reply; 9+ messages in thread
From: Per Abrahamsen @ 2002-01-02 14:15 UTC (permalink / raw)
Lars Magne Ingebrigtsen <larsi@gnus.org> writes:
> Unfortunately, the Emacs menu interface
> isn't flexible enough to allow putting `C-u g' into the menu shortcut
> thingie...
Yes it is, if you do it explicitly with the
:keys "C-u g"
keyword option to the menu entry.
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: [patch] Small enhancements for gnus-sum.el
2002-01-02 14:15 ` Per Abrahamsen
@ 2002-01-02 14:20 ` Lars Magne Ingebrigtsen
2002-01-02 17:48 ` Karl Kleinpaste
0 siblings, 1 reply; 9+ messages in thread
From: Lars Magne Ingebrigtsen @ 2002-01-02 14:20 UTC (permalink / raw)
Per Abrahamsen <abraham@dina.kvl.dk> writes:
> Yes it is, if you do it explicitly with the
>
> :keys "C-u g"
>
> keyword option to the menu entry.
Cool. I've now added this to the menu entry.
--
(domestic pets only, the antidote for overdose, milk.)
larsi@gnus.org * Lars Magne Ingebrigtsen
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: [patch] Small enhancements for gnus-sum.el
2002-01-02 14:20 ` Lars Magne Ingebrigtsen
@ 2002-01-02 17:48 ` Karl Kleinpaste
2002-01-02 19:39 ` ShengHuo ZHU
0 siblings, 1 reply; 9+ messages in thread
From: Karl Kleinpaste @ 2002-01-02 17:48 UTC (permalink / raw)
Per Abrahamsen <abraham@dina.kvl.dk> writes:
>> Yes it is, if you do it explicitly with the
>> :keys "C-u g"
>> keyword option to the menu entry.
Lars Magne Ingebrigtsen <larsi@gnus.org> writes:
> Cool. I've now added this to the menu entry.
But it's bogus for XEmacs.
Signaling: (error "not a keyword" t ["Raw article" gnus-summary-show-raw-article t :keys "C-u g"])
signal(error ("not a keyword" t ["Raw article" gnus-summary-show-raw-article t :keys "C-u g"]))
check-menu-syntax(("Article" ("Hide" ["All" gnus-article-hide t] ["Headers" gnus-article-hide-headers t] ["Signature" gnus-article-hide-signature t] ["Citation" gnus-article-hide-citation t] ["List identifiers" gnus-article-hide-list-identifiers t] ["PGP" gnus-article-hide-pgp t] ["Banner" gnus-article-strip-banner t] ["Boring headers" gnus-article-hide-boring-headers t]) ("Highlight" ["All" gnus-article-highlight t] ["Headers" gnus-article-highlight-headers t] ["Signature" gnus-article-highlight-signature t] ["Citation" gnus-article-highlight-citation t]) ("MIME" ["Words" gnus-article-decode-mime-words t] ["Charset" gnus-article-decode-charset t] ["QP" gnus-article-de-quoted-unreadable t] ["Base64" gnus-article-de-base64-unreadable t] ["View all" gnus-mime-view-all-parts t] ["Verify and Decrypt" gnus-summary-force-verify-and-decrypt t] ["Encrypt body" gnus-article-encrypt-body t]) ("Date" ["Local" gnus-article-date-local t] ["ISO8601" gnus-article-date-iso8601 t] ["UT" gnus-article-date-ut t] ["Original" gnus-article-date-original t] ["Lapsed" gnus-article-date-lapsed t] ["User-defined" gnus-article-date-user t]) ("Display" ["Remove images" gnus-article-remove-images t] ["Toggle smiley" gnus-treat-smiley t] ["Show X-Face" gnus-article-display-x-face t] ["Show picons in From" gnus-treat-from-picon t] ["Show picons in mail headers" gnus-treat-mail-picon t] ["Show picons in news headers" gnus-treat-newsgroups-picon t]) ("Washing" ("Remove Blanks" ... ... ... ... ... ... ... ...) ["Overstrike" gnus-article-treat-overstrike t] ["Dumb quotes" gnus-article-treat-dumbquotes t] ["Emphasis" gnus-article-emphasize t] ["Word wrap" gnus-article-fill-cited-article t] ["Fill long lines" gnus-article-fill-long-lines t] ["Capitalize sentences" gnus-article-capitalize-sentences t] ["CR" gnus-article-remove-cr t] ["Quoted-Printable" gnus-article-de-quoted-unreadable t] ["Base64" gnus-article-de-base64-unreadable t] ["Rot 13" gnus-summary-caesar-message t] ["Unix pipe" gnus-summary-pipe-message t] ["Add buttons" gnus-article-add-buttons t] ["Add buttons to head" gnus-article-add-buttons-to-head t] ["Stop page breaking" gnus-summary-stop-page-breaking t] ["Verbose header" gnus-summary-verbose-headers t] ["Toggle header" gnus-summary-toggle-header t] ["Unfold headers" gnus-article-treat-unfold-headers t] ["Fold newsgroups" gnus-article-treat-fold-newsgroups t] ["Html" gnus-article-wash-html t] ["Verify X-PGP-Sig" gnus-article-verify-x-pgp-sig t] ["HZ" gnus-article-decode-HZ t]) ("Output" ["Save in default format" gnus-summary-save-article t] ["Save in file" gnus-summary-save-article-file t] ["Save in Unix mail format" gnus-summary-save-article-mail t] ["Save in MH folder" gnus-summary-save-article-folder t] ["Save in VM folder" gnus-summary-save-article-vm t] ["Save in RMAIL mbox" gnus-summary-save-article-rmail t] ["Save body in file" gnus-summary-save-article-body-file t] ["Pipe through a filter" gnus-summary-pipe-output t] ["Add to SOUP packet" gnus-soup-add-article t] ["Print with Muttprint" gnus-summary-muttprint t] ["Print" gnus-summary-print-article t]) ("Backend" ["Respool article..." gnus-summary-respool-article t] ["Move article..." gnus-summary-move-article ...] ["Copy article..." gnus-summary-copy-article t] ["Crosspost article..." gnus-summary-crosspost-article ...] ["Import file..." gnus-summary-import-article t] ["Create article..." gnus-summary-create-article t] ["Check if posted" gnus-summary-article-posted-p t] ["Edit article" gnus-summary-edit-article ...] ["Delete article" gnus-summary-delete-article ...] ["Query respool" gnus-summary-respool-query t] ["Trace respool" gnus-summary-respool-trace t] ["Delete expirable articles" gnus-summary-expire-articles-now ...]) ("Extract" ["Uudecode" gnus-uu-decode-uu t] ["Uudecode and save" gnus-uu-decode-uu-and-save t] ["Unshar" gnus-uu-decode-unshar t] ["Unshar and save" gnus-uu-decode-unshar-and-save t] ["Save" gnus-uu-decode-save t] ["Binhex" gnus-uu-decode-binhex t] ["Postscript" gnus-uu-decode-postscript t]) ("Cache" ["Enter article" gnus-cache-enter-article t] ["Remove article" gnus-cache-remove-article t]) ["Translate" gnus-article-babel t] ["Select article buffer" gnus-summary-select-article-buffer t] ["Enter digest buffer" gnus-summary-enter-digest-group t] ["Isearch article..." gnus-summary-isearch-article t] ["Beginning of the article" gnus-summary-beginning-of-article t] ["End of the article" gnus-summary-end-of-article t] ["Fetch parent of article" gnus-summary-refer-parent-article t] ["Fetch referenced articles" gnus-summary-refer-references t] ["Fetch current thread" gnus-summary-refer-thread t] ["Fetch article with id..." gnus-summary-refer-article t] ["Setup Mailing List Params" gnus-mailing-list-insinuate t] ["Redisplay" gnus-summary-show-article t] ["Raw article" gnus-summary-show-raw-article t :keys "C-u g"]) nil)
add-submenu(nil ("Article" ("Hide" ["All" gnus-article-hide t] ["Headers" gnus-article-hide-headers t] ["Signature" gnus-article-hide-signature t] ["Citation" gnus-article-hide-citation t] ["List identifiers" gnus-article-hide-list-identifiers t] ["PGP" gnus-article-hide-pgp t] ["Banner" gnus-article-strip-banner t] ["Boring headers" gnus-article-hide-boring-headers t]) ("Highlight" ["All" gnus-article-highlight t] ["Headers" gnus-article-highlight-headers t] ["Signature" gnus-article-highlight-signature t] ["Citation" gnus-article-highlight-citation t]) ("MIME" ["Words" gnus-article-decode-mime-words t] ["Charset" gnus-article-decode-charset t] ["QP" gnus-article-de-quoted-unreadable t] ["Base64" gnus-article-de-base64-unreadable t] ["View all" gnus-mime-view-all-parts t] ["Verify and Decrypt" gnus-summary-force-verify-and-decrypt t] ["Encrypt body" gnus-article-encrypt-body t]) ("Date" ["Local" gnus-article-date-local t] ["ISO8601" gnus-article-date-iso8601 t] ["UT" gnus-article-date-ut t] ["Original" gnus-article-date-original t] ["Lapsed" gnus-article-date-lapsed t] ["User-defined" gnus-article-date-user t]) ("Display" ["Remove images" gnus-article-remove-images t] ["Toggle smiley" gnus-treat-smiley t] ["Show X-Face" gnus-article-display-x-face t] ["Show picons in From" gnus-treat-from-picon t] ["Show picons in mail headers" gnus-treat-mail-picon t] ["Show picons in news headers" gnus-treat-newsgroups-picon t]) ("Washing" ("Remove Blanks" ... ... ... ... ... ... ... ...) ["Overstrike" gnus-article-treat-overstrike t] ["Dumb quotes" gnus-article-treat-dumbquotes t] ["Emphasis" gnus-article-emphasize t] ["Word wrap" gnus-article-fill-cited-article t] ["Fill long lines" gnus-article-fill-long-lines t] ["Capitalize sentences" gnus-article-capitalize-sentences t] ["CR" gnus-article-remove-cr t] ["Quoted-Printable" gnus-article-de-quoted-unreadable t] ["Base64" gnus-article-de-base64-unreadable t] ["Rot 13" gnus-summary-caesar-message t] ["Unix pipe" gnus-summary-pipe-message t] ["Add buttons" gnus-article-add-buttons t] ["Add buttons to head" gnus-article-add-buttons-to-head t] ["Stop page breaking" gnus-summary-stop-page-breaking t] ["Verbose header" gnus-summary-verbose-headers t] ["Toggle header" gnus-summary-toggle-header t] ["Unfold headers" gnus-article-treat-unfold-headers t] ["Fold newsgroups" gnus-article-treat-fold-newsgroups t] ["Html" gnus-article-wash-html t] ["Verify X-PGP-Sig" gnus-article-verify-x-pgp-sig t] ["HZ" gnus-article-decode-HZ t]) ("Output" ["Save in default format" gnus-summary-save-article t] ["Save in file" gnus-summary-save-article-file t] ["Save in Unix mail format" gnus-summary-save-article-mail t] ["Save in MH folder" gnus-summary-save-article-folder t] ["Save in VM folder" gnus-summary-save-article-vm t] ["Save in RMAIL mbox" gnus-summary-save-article-rmail t] ["Save body in file" gnus-summary-save-article-body-file t] ["Pipe through a filter" gnus-summary-pipe-output t] ["Add to SOUP packet" gnus-soup-add-article t] ["Print with Muttprint" gnus-summary-muttprint t] ["Print" gnus-summary-print-article t]) ("Backend" ["Respool article..." gnus-summary-respool-article t] ["Move article..." gnus-summary-move-article ...] ["Copy article..." gnus-summary-copy-article t] ["Crosspost article..." gnus-summary-crosspost-article ...] ["Import file..." gnus-summary-import-article t] ["Create article..." gnus-summary-create-article t] ["Check if posted" gnus-summary-article-posted-p t] ["Edit article" gnus-summary-edit-article ...] ["Delete article" gnus-summary-delete-article ...] ["Query respool" gnus-summary-respool-query t] ["Trace respool" gnus-summary-respool-trace t] ["Delete expirable articles" gnus-summary-expire-articles-now ...]) ("Extract" ["Uudecode" gnus-uu-decode-uu t] ["Uudecode and save" gnus-uu-decode-uu-and-save t] ["Unshar" gnus-uu-decode-unshar t] ["Unshar and save" gnus-uu-decode-unshar-and-save t] ["Save" gnus-uu-decode-save t] ["Binhex" gnus-uu-decode-binhex t] ["Postscript" gnus-uu-decode-postscript t]) ("Cache" ["Enter article" gnus-cache-enter-article t] ["Remove article" gnus-cache-remove-article t]) ["Translate" gnus-article-babel t] ["Select article buffer" gnus-summary-select-article-buffer t] ["Enter digest buffer" gnus-summary-enter-digest-group t] ["Isearch article..." gnus-summary-isearch-article t] ["Beginning of the article" gnus-summary-beginning-of-article t] ["End of the article" gnus-summary-end-of-article t] ["Fetch parent of article" gnus-summary-refer-parent-article t] ["Fetch referenced articles" gnus-summary-refer-references t] ["Fetch current thread" gnus-summary-refer-thread t] ["Fetch article with id..." gnus-summary-refer-article t] ["Setup Mailing List Params" gnus-mailing-list-insinuate t] ["Redisplay" gnus-summary-show-article t] ["Raw article" gnus-summary-show-raw-article t :keys "C-u g"]) nil)
add-menu(nil "Article" (("Hide" ["All" gnus-article-hide t] ["Headers" gnus-article-hide-headers t] ["Signature" gnus-article-hide-signature t] ["Citation" gnus-article-hide-citation t] ["List identifiers" gnus-article-hide-list-identifiers t] ["PGP" gnus-article-hide-pgp t] ["Banner" gnus-article-strip-banner t] ["Boring headers" gnus-article-hide-boring-headers t]) ("Highlight" ["All" gnus-article-highlight t] ["Headers" gnus-article-highlight-headers t] ["Signature" gnus-article-highlight-signature t] ["Citation" gnus-article-highlight-citation t]) ("MIME" ["Words" gnus-article-decode-mime-words t] ["Charset" gnus-article-decode-charset t] ["QP" gnus-article-de-quoted-unreadable t] ["Base64" gnus-article-de-base64-unreadable t] ["View all" gnus-mime-view-all-parts t] ["Verify and Decrypt" gnus-summary-force-verify-and-decrypt t] ["Encrypt body" gnus-article-encrypt-body t]) ("Date" ["Local" gnus-article-date-local t] ["ISO8601" gnus-article-date-iso8601 t] ["UT" gnus-article-date-ut t] ["Original" gnus-article-date-original t] ["Lapsed" gnus-article-date-lapsed t] ["User-defined" gnus-article-date-user t]) ("Display" ["Remove images" gnus-article-remove-images t] ["Toggle smiley" gnus-treat-smiley t] ["Show X-Face" gnus-article-display-x-face t] ["Show picons in From" gnus-treat-from-picon t] ["Show picons in mail headers" gnus-treat-mail-picon t] ["Show picons in news headers" gnus-treat-newsgroups-picon t]) ("Washing" ("Remove Blanks" ... ... ... ... ... ... ... ...) ["Overstrike" gnus-article-treat-overstrike t] ["Dumb quotes" gnus-article-treat-dumbquotes t] ["Emphasis" gnus-article-emphasize t] ["Word wrap" gnus-article-fill-cited-article t] ["Fill long lines" gnus-article-fill-long-lines t] ["Capitalize sentences" gnus-article-capitalize-sentences t] ["CR" gnus-article-remove-cr t] ["Quoted-Printable" gnus-article-de-quoted-unreadable t] ["Base64" gnus-article-de-base64-unreadable t] ["Rot 13" gnus-summary-caesar-message t] ["Unix pipe" gnus-summary-pipe-message t] ["Add buttons" gnus-article-add-buttons t] ["Add buttons to head" gnus-article-add-buttons-to-head t] ["Stop page breaking" gnus-summary-stop-page-breaking t] ["Verbose header" gnus-summary-verbose-headers t] ["Toggle header" gnus-summary-toggle-header t] ["Unfold headers" gnus-article-treat-unfold-headers t] ["Fold newsgroups" gnus-article-treat-fold-newsgroups t] ["Html" gnus-article-wash-html t] ["Verify X-PGP-Sig" gnus-article-verify-x-pgp-sig t] ["HZ" gnus-article-decode-HZ t]) ("Output" ["Save in default format" gnus-summary-save-article t] ["Save in file" gnus-summary-save-article-file t] ["Save in Unix mail format" gnus-summary-save-article-mail t] ["Save in MH folder" gnus-summary-save-article-folder t] ["Save in VM folder" gnus-summary-save-article-vm t] ["Save in RMAIL mbox" gnus-summary-save-article-rmail t] ["Save body in file" gnus-summary-save-article-body-file t] ["Pipe through a filter" gnus-summary-pipe-output t] ["Add to SOUP packet" gnus-soup-add-article t] ["Print with Muttprint" gnus-summary-muttprint t] ["Print" gnus-summary-print-article t]) ("Backend" ["Respool article..." gnus-summary-respool-article t] ["Move article..." gnus-summary-move-article ...] ["Copy article..." gnus-summary-copy-article t] ["Crosspost article..." gnus-summary-crosspost-article ...] ["Import file..." gnus-summary-import-article t] ["Create article..." gnus-summary-create-article t] ["Check if posted" gnus-summary-article-posted-p t] ["Edit article" gnus-summary-edit-article ...] ["Delete article" gnus-summary-delete-article ...] ["Query respool" gnus-summary-respool-query t] ["Trace respool" gnus-summary-respool-trace t] ["Delete expirable articles" gnus-summary-expire-articles-now ...]) ("Extract" ["Uudecode" gnus-uu-decode-uu t] ["Uudecode and save" gnus-uu-decode-uu-and-save t] ["Unshar" gnus-uu-decode-unshar t] ["Unshar and save" gnus-uu-decode-unshar-and-save t] ["Save" gnus-uu-decode-save t] ["Binhex" gnus-uu-decode-binhex t] ["Postscript" gnus-uu-decode-postscript t]) ("Cache" ["Enter article" gnus-cache-enter-article t] ["Remove article" gnus-cache-remove-article t]) ["Translate" gnus-article-babel t] ["Select article buffer" gnus-summary-select-article-buffer t] ["Enter digest buffer" gnus-summary-enter-digest-group t] ["Isearch article..." gnus-summary-isearch-article t] ["Beginning of the article" gnus-summary-beginning-of-article t] ["End of the article" gnus-summary-end-of-article t] ["Fetch parent of article" gnus-summary-refer-parent-article t] ["Fetch referenced articles" gnus-summary-refer-references t] ["Fetch current thread" gnus-summary-refer-thread t] ["Fetch article with id..." gnus-summary-refer-article t] ["Setup Mailing List Params" gnus-mailing-list-insinuate t] ["Redisplay" gnus-summary-show-article t] ["Raw article" gnus-summary-show-raw-article t :keys "C-u g"]))
easy-menu-add(("Article" ("Hide" ["All" gnus-article-hide t] ["Headers" gnus-article-hide-headers t] ["Signature" gnus-article-hide-signature t] ["Citation" gnus-article-hide-citation t] ["List identifiers" gnus-article-hide-list-identifiers t] ["PGP" gnus-article-hide-pgp t] ["Banner" gnus-article-strip-banner t] ["Boring headers" gnus-article-hide-boring-headers t]) ("Highlight" ["All" gnus-article-highlight t] ["Headers" gnus-article-highlight-headers t] ["Signature" gnus-article-highlight-signature t] ["Citation" gnus-article-highlight-citation t]) ("MIME" ["Words" gnus-article-decode-mime-words t] ["Charset" gnus-article-decode-charset t] ["QP" gnus-article-de-quoted-unreadable t] ["Base64" gnus-article-de-base64-unreadable t] ["View all" gnus-mime-view-all-parts t] ["Verify and Decrypt" gnus-summary-force-verify-and-decrypt t] ["Encrypt body" gnus-article-encrypt-body t]) ("Date" ["Local" gnus-article-date-local t] ["ISO8601" gnus-article-date-iso8601 t] ["UT" gnus-article-date-ut t] ["Original" gnus-article-date-original t] ["Lapsed" gnus-article-date-lapsed t] ["User-defined" gnus-article-date-user t]) ("Display" ["Remove images" gnus-article-remove-images t] ["Toggle smiley" gnus-treat-smiley t] ["Show X-Face" gnus-article-display-x-face t] ["Show picons in From" gnus-treat-from-picon t] ["Show picons in mail headers" gnus-treat-mail-picon t] ["Show picons in news headers" gnus-treat-newsgroups-picon t]) ("Washing" ("Remove Blanks" ... ... ... ... ... ... ... ...) ["Overstrike" gnus-article-treat-overstrike t] ["Dumb quotes" gnus-article-treat-dumbquotes t] ["Emphasis" gnus-article-emphasize t] ["Word wrap" gnus-article-fill-cited-article t] ["Fill long lines" gnus-article-fill-long-lines t] ["Capitalize sentences" gnus-article-capitalize-sentences t] ["CR" gnus-article-remove-cr t] ["Quoted-Printable" gnus-article-de-quoted-unreadable t] ["Base64" gnus-article-de-base64-unreadable t] ["Rot 13" gnus-summary-caesar-message t] ["Unix pipe" gnus-summary-pipe-message t] ["Add buttons" gnus-article-add-buttons t] ["Add buttons to head" gnus-article-add-buttons-to-head t] ["Stop page breaking" gnus-summary-stop-page-breaking t] ["Verbose header" gnus-summary-verbose-headers t] ["Toggle header" gnus-summary-toggle-header t] ["Unfold headers" gnus-article-treat-unfold-headers t] ["Fold newsgroups" gnus-article-treat-fold-newsgroups t] ["Html" gnus-article-wash-html t] ["Verify X-PGP-Sig" gnus-article-verify-x-pgp-sig t] ["HZ" gnus-article-decode-HZ t]) ("Output" ["Save in default format" gnus-summary-save-article t] ["Save in file" gnus-summary-save-article-file t] ["Save in Unix mail format" gnus-summary-save-article-mail t] ["Save in MH folder" gnus-summary-save-article-folder t] ["Save in VM folder" gnus-summary-save-article-vm t] ["Save in RMAIL mbox" gnus-summary-save-article-rmail t] ["Save body in file" gnus-summary-save-article-body-file t] ["Pipe through a filter" gnus-summary-pipe-output t] ["Add to SOUP packet" gnus-soup-add-article t] ["Print with Muttprint" gnus-summary-muttprint t] ["Print" gnus-summary-print-article t]) ("Backend" ["Respool article..." gnus-summary-respool-article t] ["Move article..." gnus-summary-move-article ...] ["Copy article..." gnus-summary-copy-article t] ["Crosspost article..." gnus-summary-crosspost-article ...] ["Import file..." gnus-summary-import-article t] ["Create article..." gnus-summary-create-article t] ["Check if posted" gnus-summary-article-posted-p t] ["Edit article" gnus-summary-edit-article ...] ["Delete article" gnus-summary-delete-article ...] ["Query respool" gnus-summary-respool-query t] ["Trace respool" gnus-summary-respool-trace t] ["Delete expirable articles" gnus-summary-expire-articles-now ...]) ("Extract" ["Uudecode" gnus-uu-decode-uu t] ["Uudecode and save" gnus-uu-decode-uu-and-save t] ["Unshar" gnus-uu-decode-unshar t] ["Unshar and save" gnus-uu-decode-unshar-and-save t] ["Save" gnus-uu-decode-save t] ["Binhex" gnus-uu-decode-binhex t] ["Postscript" gnus-uu-decode-postscript t]) ("Cache" ["Enter article" gnus-cache-enter-article t] ["Remove article" gnus-cache-remove-article t]) ["Translate" gnus-article-babel t] ["Select article buffer" gnus-summary-select-article-buffer t] ["Enter digest buffer" gnus-summary-enter-digest-group t] ["Isearch article..." gnus-summary-isearch-article t] ["Beginning of the article" gnus-summary-beginning-of-article t] ["End of the article" gnus-summary-end-of-article t] ["Fetch parent of article" gnus-summary-refer-parent-article t] ["Fetch referenced articles" gnus-summary-refer-references t] ["Fetch current thread" gnus-summary-refer-thread t] ["Fetch article with id..." gnus-summary-refer-article t] ["Setup Mailing List Params" gnus-mailing-list-insinuate t] ["Redisplay" gnus-summary-show-article t] ["Raw article" gnus-summary-show-raw-article t :keys "C-u g"]))
gnus-xmas-menu-add-1(summary (gnus-summary-misc-menu gnus-summary-kill-menu gnus-summary-article-menu gnus-summary-thread-menu gnus-summary-post-menu))
gnus-xmas-summary-menu-add()
run-hooks(gnus-xmas-summary-menu-add)
apply(run-hooks gnus-xmas-summary-menu-add)
gnus-run-hooks(gnus-summary-mode-hook)
gnus-summary-mode("list.ding")
gnus-summary-setup-buffer("list.ding")
gnus-summary-read-group-1("list.ding" nil nil nil nil nil)
gnus-summary-read-group("list.ding" nil nil nil nil nil nil)
gnus-group-read-group(nil nil nil)
gnus-topic-read-group(nil)
call-interactively(gnus-topic-read-group)
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: [patch] Small enhancements for gnus-sum.el
2002-01-02 17:48 ` Karl Kleinpaste
@ 2002-01-02 19:39 ` ShengHuo ZHU
0 siblings, 0 replies; 9+ messages in thread
From: ShengHuo ZHU @ 2002-01-02 19:39 UTC (permalink / raw)
Karl Kleinpaste <karl@charcoal.com> writes:
> Per Abrahamsen <abraham@dina.kvl.dk> writes:
>>> Yes it is, if you do it explicitly with the
>>> :keys "C-u g"
>>> keyword option to the menu entry.
>
> Lars Magne Ingebrigtsen <larsi@gnus.org> writes:
>> Cool. I've now added this to the menu entry.
>
> But it's bogus for XEmacs.
I've installed Steve's patch, which fixes it.
ShengHuo
^ permalink raw reply [flat|nested] 9+ messages in thread
end of thread, other threads:[~2002-01-02 19:39 UTC | newest]
Thread overview: 9+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2001-12-03 0:28 [patch] Small enhancements for gnus-sum.el Frank Schmitt
2001-12-03 7:48 ` Kai Großjohann
2001-12-03 10:16 ` Frank Schmitt
2001-12-07 16:23 ` Frank Schmitt
2001-12-29 2:20 ` Lars Magne Ingebrigtsen
2002-01-02 14:15 ` Per Abrahamsen
2002-01-02 14:20 ` Lars Magne Ingebrigtsen
2002-01-02 17:48 ` Karl Kleinpaste
2002-01-02 19:39 ` ShengHuo ZHU
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).