X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus.el;h=b46301508656ce731bfcc90e5089304a5bb3dd85;hb=14ff48baa718a7bae029928503145ee520001253;hp=b209f44bba0fee72f8da174415027a04b6168d07;hpb=b83561e18ceb438203812786590893bd5fc2a6cc;p=gnus diff --git a/lisp/gnus.el b/lisp/gnus.el index b209f44bb..b46301508 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -290,7 +290,7 @@ is restarted, and sometimes reloaded." :link '(custom-manual "(gnus)Exiting Gnus") :group 'gnus) -(defconst gnus-version-number "0.12" +(defconst gnus-version-number "0.14" "Version number for this version of Gnus.") (defconst gnus-version (format "Ma Gnus v%s" gnus-version-number) @@ -304,17 +304,6 @@ be set in `.emacs' instead." :type 'boolean) (unless (featurep 'gnus-xmas) - (defalias 'gnus-make-overlay 'make-overlay) - (defalias 'gnus-copy-overlay 'copy-overlay) - (defalias 'gnus-delete-overlay 'delete-overlay) - (defalias 'gnus-overlay-get 'overlay-get) - (defalias 'gnus-overlay-put 'overlay-put) - (defalias 'gnus-move-overlay 'move-overlay) - (defalias 'gnus-overlay-buffer 'overlay-buffer) - (defalias 'gnus-overlay-start 'overlay-start) - (defalias 'gnus-overlay-end 'overlay-end) - (defalias 'gnus-overlays-at 'overlays-at) - (defalias 'gnus-overlays-in 'overlays-in) (defalias 'gnus-extent-detached-p 'ignore) (defalias 'gnus-extent-start-open 'ignore) (defalias 'gnus-mail-strip-quoted-names 'mail-strip-quoted-names) @@ -1319,11 +1308,11 @@ news is to be fetched, the second is the address. For instance, if you want to get your news via \"flab.flab.edu\" using NNTP, you could say: -\(setq gnus-select-method '(nntp \"flab.flab.edu\")) +\(setq gnus-select-method \\='(nntp \"flab.flab.edu\")) If you want to use your local spool, say: -\(setq gnus-select-method (list 'nnspool (system-name))) +\(setq gnus-select-method (list \\='nnspool (system-name))) If you use this variable, you must set `gnus-nntp-server' to nil. @@ -1372,8 +1361,8 @@ group (or nil) as a parameter. If you want to save your mail in one group and the news articles you write in another group, you could say something like: - \(setq gnus-message-archive-group - '((if (message-news-p) + (setq gnus-message-archive-group + \\='((if (message-news-p) \"misc-news\" \"misc-mail\"))) @@ -1408,7 +1397,7 @@ This is a list where each element is a complete select method (see If, for instance, you want to read your mail with the nnml back end, you could set this variable: -\(setq gnus-secondary-select-methods '((nnml \"\")))" +\(setq gnus-secondary-select-methods \\='((nnml \"\")))" :group 'gnus-server :type '(repeat gnus-select-method)) @@ -2407,7 +2396,7 @@ less space and be faster as a result. This variable can also be a list of visual elements to switch on. For instance, to switch off all visual things except menus, you can say: - (setq gnus-visual '(menu)) + (setq gnus-visual \\='(menu)) Valid elements include `summary-highlight', `group-highlight', `article-highlight', `mouse-face', `summary-menu', `group-menu', @@ -2528,10 +2517,10 @@ This should be an alist for Emacs, or a plist for XEmacs." "Which information should be exposed in the User-Agent header. Can be a list of symbols or a string. Valid symbols are `gnus' -\(show Gnus version\) and `emacs' \(show Emacs version\). In +\(show Gnus version) and `emacs' \(show Emacs version). In addition to the Emacs version, you can add `codename' \(show -\(S\)XEmacs codename\) or either `config' \(show system -configuration\) or `type' \(show system type\). If you set it to +\(S)XEmacs codename) or either `config' \(show system +configuration) or `type' \(show system type). If you set it to a string, be sure to use a valid format, see RFC 2616." :version "22.1"