mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-02-05 20:43:08 +00:00
Merge from gnus--rel--5.10
Patches applied: * gnus--rel--5.10 (patch 237-238) - Update from CVS 2007-07-21 Reiner Steib <Reiner.Steib@gmx.de> * lisp/gnus/mm-uu.el (mm-uu-type-alist): Refer to mm-uu-configure-list in doc string. 2007-07-16 Katsumi Yamaoka <yamaoka@jpl.org> * lisp/gnus/gnus-srvr.el (gnus-server-font-lock-keywords): Quote faces. Revision: emacs@sv.gnu.org/emacs--rel--22--patch-69
This commit is contained in:
parent
483bdbb35b
commit
f931ce84da
@ -1,3 +1,12 @@
|
||||
2007-07-21 Reiner Steib <Reiner.Steib@gmx.de>
|
||||
|
||||
* mm-uu.el (mm-uu-type-alist): Refer to mm-uu-configure-list in doc
|
||||
string.
|
||||
|
||||
2007-07-16 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* gnus-srvr.el (gnus-server-font-lock-keywords): Quote faces.
|
||||
|
||||
2007-07-13 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* gnus-srvr.el (gnus-server-agent-face, gnus-server-opened-face)
|
||||
|
@ -215,11 +215,11 @@ If nil, a faster, but more primitive, buffer is used instead."
|
||||
(put 'gnus-server-offline-face 'face-alias 'gnus-server-offline)
|
||||
|
||||
(defvar gnus-server-font-lock-keywords
|
||||
'(("(\\(agent\\))" 1 gnus-server-agent)
|
||||
("(\\(opened\\))" 1 gnus-server-opened)
|
||||
("(\\(closed\\))" 1 gnus-server-closed)
|
||||
("(\\(offline\\))" 1 gnus-server-offline)
|
||||
("(\\(denied\\))" 1 gnus-server-denied)))
|
||||
'(("(\\(agent\\))" 1 'gnus-server-agent)
|
||||
("(\\(opened\\))" 1 'gnus-server-opened)
|
||||
("(\\(closed\\))" 1 'gnus-server-closed)
|
||||
("(\\(offline\\))" 1 'gnus-server-offline)
|
||||
("(\\(denied\\))" 1 'gnus-server-denied)))
|
||||
|
||||
(defun gnus-server-mode ()
|
||||
"Major mode for listing and editing servers.
|
||||
|
@ -162,7 +162,10 @@ This can be either \"inline\" or \"attachment\".")
|
||||
Each element consist of the following entries: label,
|
||||
start-regexp, end-regexp, extract-function, test-function.
|
||||
|
||||
After modifying this list you must run \\[mm-uu-configure].")
|
||||
After modifying this list you must run \\[mm-uu-configure].
|
||||
|
||||
You can disable elements from this list by customizing
|
||||
`mm-uu-configure-list'.")
|
||||
|
||||
(defcustom mm-uu-configure-list '((shar . disabled))
|
||||
"A list of mm-uu configuration.
|
||||
|
Loading…
x
Reference in New Issue
Block a user