From: yamaoka Date: Fri, 30 Aug 2002 05:58:57 +0000 (+0000) Subject: Synch with Oort Gnus. X-Git-Tag: t-gnus-6_15_8-01-quimby~14 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=502023dd19fabd24d69ed40b37623d7910d93c55;p=elisp%2Fgnus.git- Synch with Oort Gnus. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0ac078a..b4c02a9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,21 @@ +2002-08-30 Katsumi Yamaoka + + * gnus-mlspl.el (gnus-group-split-fancy): Doc fix. + From Alex Schroeder . + +2002-08-29 Jesper harder + + * gnus-group.el (gnus-group-make-menu-bar): Add ellipses to menu + items expecting user interaction. + + * gnus-topic.el (gnus-topic-make-menu-bar): do. + + * gnus-sum.el (gnus-summary-make-menu-bar): do. + + * gnus-srvr.el (gnus-server-make-menu-bar): do. + + * mml.el (mml-menu): do. + 2002-08-28 Katsumi Yamaoka * mail-source.el (mail-source-touch-pop): New function. diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el index 9e153b1..25bbbba 100644 --- a/lisp/gnus-group.el +++ b/lisp/gnus-group.el @@ -763,7 +763,7 @@ simple manner.") (gnus-check-backend-function 'request-expire-articles (gnus-group-group-name))) gnus-group-marked)] - ["Set group level" gnus-group-set-current-level + ["Set group level..." gnus-group-set-current-level (gnus-group-group-name)] ["Select quick" gnus-group-quick-select-group (gnus-group-group-name)] ["Customize" gnus-group-customize (gnus-group-group-name)] @@ -833,23 +833,23 @@ simple manner.") ["Execute command" gnus-group-universal-argument (or gnus-group-marked (gnus-group-group-name))]) ("Subscribe" - ["Subscribe to a group" gnus-group-unsubscribe-group t] + ["Subscribe to a group..." gnus-group-unsubscribe-group t] ["Kill all newsgroups in region" gnus-group-kill-region t] ["Kill all zombie groups" gnus-group-kill-all-zombies gnus-zombie-list] ["Kill all groups on level..." gnus-group-kill-level t]) ("Foreign groups" - ["Make a foreign group" gnus-group-make-group t] - ["Make a shimbun group" gnus-group-make-shimbun-group t] - ["Add a directory group" gnus-group-make-directory-group t] + ["Make a foreign group..." gnus-group-make-group t] + ["Make a shimbun group..." gnus-group-make-shimbun-group t] + ["Add a directory group..." gnus-group-make-directory-group t] ["Add the help group" gnus-group-make-help-group t] ["Add the archive group" gnus-group-make-archive-group t] - ["Make a doc group" gnus-group-make-doc-group t] - ["Make a web group" gnus-group-make-web-group t] - ["Make a kiboze group" gnus-group-make-kiboze-group t] - ["Make a virtual group" gnus-group-make-empty-virtual t] - ["Add a group to a virtual" gnus-group-add-to-virtual t] - ["Rename group" gnus-group-rename-group + ["Make a doc group..." gnus-group-make-doc-group t] + ["Make a web group..." gnus-group-make-web-group t] + ["Make a kiboze group..." gnus-group-make-kiboze-group t] + ["Make a virtual group..." gnus-group-make-empty-virtual t] + ["Add a group to a virtual..." gnus-group-add-to-virtual t] + ["Rename group..." gnus-group-rename-group (gnus-check-backend-function 'request-rename-group (gnus-group-group-name))] ["Delete group" gnus-group-delete-group @@ -863,7 +863,7 @@ simple manner.") ["Next unread same level" gnus-group-next-unread-group-same-level t] ["Previous unread same level" gnus-group-prev-unread-group-same-level t] - ["Jump to group" gnus-group-jump-to-group t] + ["Jump to group..." gnus-group-jump-to-group t] ["First unread group" gnus-group-first-unread-group t] ["Best unread group" gnus-group-best-unread-group t]) ("Sieve" @@ -899,7 +899,7 @@ simple manner.") ["Activate all groups" gnus-activate-all-groups t] ["Restart Gnus" gnus-group-restart t] ["Read init file" gnus-group-read-init-file t] - ["Browse foreign server" gnus-group-browse-foreign-server t] + ["Browse foreign server..." gnus-group-browse-foreign-server t] ["Enter server buffer" gnus-group-enter-server-mode t] ["Expire all expirable articles" gnus-group-expire-all-groups t] ["Generate any kiboze groups" nnkiboze-generate-groups t] diff --git a/lisp/gnus-mlspl.el b/lisp/gnus-mlspl.el index 83bd360..bf84e6d 100644 --- a/lisp/gnus-mlspl.el +++ b/lisp/gnus-mlspl.el @@ -139,7 +139,7 @@ nnml:mail.foo: nnml:mail.others: \((split-spec . catch-all)) -Calling (gnus-group-split-fancy nil nil \"mail.misc\") returns: +Calling (gnus-group-split-fancy nil nil \"mail.others\") returns: \(| (& (any \"\\\\(bar@femail\\\\.com\\\\|.*@femail\\\\.com\\\\)\" \"mail.bar\") diff --git a/lisp/gnus-srvr.el b/lisp/gnus-srvr.el index 98c24ad..ff93f6b 100644 --- a/lisp/gnus-srvr.el +++ b/lisp/gnus-srvr.el @@ -105,7 +105,7 @@ If nil, a faster, but more primitive, buffer is used instead." (easy-menu-define gnus-server-server-menu gnus-server-mode-map "" '("Server" - ["Add" gnus-server-add-server t] + ["Add..." gnus-server-add-server t] ["Browse" gnus-server-read-server t] ["Scan" gnus-server-scan-server t] ["List" gnus-server-list-servers t] diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index 7ad609f..67e3e5e 100644 --- a/lisp/gnus-sum.el +++ b/lisp/gnus-sum.el @@ -2068,7 +2068,7 @@ gnus-summary-show-article-from-menu-as-charset-%s" cs)))) ["Rot 13" gnus-summary-caesar-message ,@(if (featurep 'xemacs) '(t) '(:help "\"Caesar rotate\" article by 13"))] - ["Unix pipe" gnus-summary-pipe-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] @@ -2264,7 +2264,7 @@ gnus-summary-show-article-from-menu-as-charset-%s" cs)))) ["Author..." gnus-summary-limit-to-author t] ["Age..." gnus-summary-limit-to-age t] ["Extra..." gnus-summary-limit-to-extra t] - ["Score" gnus-summary-limit-to-score t] + ["Score..." gnus-summary-limit-to-score t] ["Display Predicate" gnus-summary-limit-to-display-predicate t] ["Unread" gnus-summary-limit-to-unread t] ["Non-dormant" gnus-summary-limit-exclude-dormant t] diff --git a/lisp/gnus-topic.el b/lisp/gnus-topic.el index d356c31..c82292c 100644 --- a/lisp/gnus-topic.el +++ b/lisp/gnus-topic.el @@ -1088,18 +1088,18 @@ articles in the topic and its subtopics." '("Topics" ["Toggle topics" gnus-topic-mode t] ("Groups" - ["Copy" gnus-topic-copy-group t] - ["Move" gnus-topic-move-group t] + ["Copy..." gnus-topic-copy-group t] + ["Move..." gnus-topic-move-group t] ["Remove" gnus-topic-remove-group t] - ["Copy matching" gnus-topic-copy-matching t] + ["Copy matching..." gnus-topic-copy-matching t] ["Move matching" gnus-topic-move-matching t]) ("Topics" - ["Goto" gnus-topic-jump-to-topic t] + ["Goto..." gnus-topic-jump-to-topic t] ["Show" gnus-topic-show-topic t] ["Hide" gnus-topic-hide-topic t] ["Delete" gnus-topic-delete t] - ["Rename" gnus-topic-rename t] - ["Create" gnus-topic-create-topic t] + ["Rename..." gnus-topic-rename t] + ["Create..." gnus-topic-create-topic t] ["Mark" gnus-topic-mark-topic t] ["Indent" gnus-topic-indent t] ["Sort" gnus-topic-sort-topics t] diff --git a/lisp/mml.el b/lisp/mml.el index 6950d6c..99d4115 100644 --- a/lisp/mml.el +++ b/lisp/mml.el @@ -818,13 +818,13 @@ If HANDLES is non-nil, use it instead reparsing the buffer." (easy-menu-define mml-menu mml-mode-map "" `("Attachments" - ["Attach File" mml-attach-file + ["Attach File..." mml-attach-file ,@(if (featurep 'xemacs) '(t) '(:help "Attach a file at point"))] - ["Attach Buffer" mml-attach-buffer t] - ["Attach External" mml-attach-external t] - ["Insert Part" mml-insert-part t] - ["Insert Multipart" mml-insert-multipart t] + ["Attach Buffer..." mml-attach-buffer t] + ["Attach External..." mml-attach-external t] + ["Insert Part..." mml-insert-part t] + ["Insert Multipart..." mml-insert-multipart t] ["PGP/MIME Sign" mml-secure-message-sign-pgpmime t] ["PGP/MIME Encrypt" mml-secure-message-encrypt-pgpmime t] ["PGP Sign" mml-secure-message-sign-pgp t]