diff -aruN G/GNUS-NEWS E/GNUS-NEWS --- G/GNUS-NEWS 2012-02-01 08:22:34.000000000 +0000 +++ E/GNUS-NEWS 2012-01-05 10:59:17.000000000 +0000 @@ -67,7 +67,7 @@ ** Old intermediate incoming mail files (`Incoming*') are deleted after a couple of days, not immediately. *Note Mail Source Customization::. -(New in Gnus 5.10.10 / No Gnus 0.8) +(New in Gnus 5.10.10 / Emacs 22.2) diff -aruN G/etc/gnus-tut.txt E/etc/gnus-tut.txt --- G/etc/gnus-tut.txt 2012-02-01 00:20:05.000000000 +0000 +++ E/etc/gnus-tut.txt 2012-01-05 10:59:17.000000000 +0000 @@ -1,5 +1,5 @@ From lars Thu Feb 23 23:20:38 1995 -From: larsi@gnus.org (ding) +From: larsi@ifi.uio.no (ding) Date: Fri Feb 24 13:40:45 1995 Subject: So you want to use the new Gnus Message-ID: @@ -22,8 +22,7 @@ Gnus is a rewrite of GNUS 4.1, written by Masanobu Umeda. The rewrite was done by moi, yours truly, your humble servant, Lars Magne Ingebrigtsen. If you have a WWW browser, you can investigate to your -heart's delight at and -. +heart's delight at . ;; Copyright (C) 1995, 2001-2012 Free Software Foundation, Inc. @@ -46,7 +45,7 @@ ;; along with GNU Emacs. If not, see . From lars Thu Feb 23 23:20:38 1995 -From: larsi@gnus.org (ding) +From: larsi@ifi.uio.no (ding) Date: Fri Feb 24 13:40:45 1995 Subject: Starting up Message-ID: @@ -75,7 +74,7 @@ From lars Thu Feb 23 23:20:38 1995 -From: larsi@gnus.org (ding) +From: larsi@ifi.uio.no (ding) Date: Fri Feb 24 13:40:45 1995 Subject: Where are all the groups, then? Message-ID: @@ -108,7 +107,7 @@ From lars Thu Feb 23 23:20:38 1995 -From: larsi@gnus.org (ding) +From: larsi@ifi.uio.no (ding) Date: Fri Feb 24 13:40:45 1995 Subject: I want to read my mail! Message-ID: @@ -146,7 +145,7 @@ From lars Thu Feb 23 23:20:38 1995 -From: larsi@gnus.org (ding) +From: larsi@ifi.uio.no (ding) Date: Fri Feb 24 13:40:45 1995 Subject: Foreign newsgroups Message-ID: @@ -169,7 +168,7 @@ From lars Thu Feb 23 23:20:38 1995 -From: larsi@gnus.org (ding) +From: larsi@ifi.uio.no (ding) Date: Fri Feb 24 13:40:45 1995 Subject: Low level changes in GNUS, or, Wrong type argument: stringp, nil Message-ID: @@ -193,11 +192,11 @@ There is absolutely no chance, whatsoever, of getting Gnus to work with Emacs 18. It won't even work on Emacsen older than Emacs -20.7/XEmacs 21.1. Upgrade your Emacs or die. +19.30/XEmacs 19.13. Upgrade your Emacs or die. From lars Thu Feb 23 23:20:38 1995 -From: larsi@gnus.org (ding) +From: larsi@ifi.uio.no (ding) Date: Fri Feb 24 13:40:45 1995 Subject: How do I re-scan my mail groups? Message-ID: @@ -211,7 +210,7 @@ From lars Thu Feb 23 23:20:38 1995 -From: larsi@gnus.org (ding) +From: larsi@ifi.uio.no (ding) Date: Fri Feb 24 13:40:45 1995 Subject: How do I set up virtual newsgroups? Message-ID: @@ -265,7 +264,7 @@ From lars Thu Feb 23 23:20:38 1995 -From: larsi@gnus.org (ding) +From: larsi@ifi.uio.no (ding) Date: Fri Feb 24 13:40:45 1995 Subject: Bugs & stuff Message-ID: @@ -287,28 +286,5 @@ I would, of course, prefer that you locate the bug, fix it, and mail me the patches, but one can't have everything. -If you have any questions on usage, the "ding@gnus.org" mailing list +If you have any questions on usage, the "ding@ifi.uio.no" mailing list is where to post the questions. - - -From fschmitt Sat Mar 22 18:13:00 2003 -From: faq@my.gnus.org (Gnus FAQ team) -Date: Sat Mar 22 18:13:00 2003 -Subject: Gnus FAQ (Frequently Asked Questions) -Message-ID: - -The Gnus FAQ is distributed within the Gnus manual. The home page of -the Gnus FAQ is , where you can find the -most recent version in HTML various other formats. - -To browse the FAQ now, put the cursor at the end of the following line -and press `C-x C-e': - - (info "(gnus)Frequently Asked Questions") - -On older XEmacs version, use: - - (Info-goto-node "(gnus)Frequently Asked Questions") - -Or simply use RET or the middle mouse button, if the above is displayed -as a clickable button. diff -aruN G/lisp/auth-source.el E/lisp/auth-source.el --- G/lisp/auth-source.el 2012-02-01 00:20:08.000000000 +0000 +++ E/lisp/auth-source.el 2012-01-10 22:03:27.000000000 +0000 @@ -45,17 +45,7 @@ (require 'assoc) (eval-when-compile (require 'cl)) -(eval-and-compile - (or (ignore-errors (require 'eieio)) - ;; gnus-fallback-lib/ from gnus/lisp/gnus-fallback-lib - (ignore-errors - (let ((load-path (cons (expand-file-name - "gnus-fallback-lib/eieio" - (file-name-directory (locate-library "gnus"))) - load-path))) - (require 'eieio))) - (error - "eieio not found in `load-path' or gnus-fallback-lib/ directory."))) +(require 'eieio) (autoload 'secrets-create-item "secrets") (autoload 'secrets-delete-item "secrets") diff -aruN G/lisp/gnus-group.el E/lisp/gnus-group.el --- G/lisp/gnus-group.el 2012-02-02 11:03:51.000000000 +0000 +++ E/lisp/gnus-group.el 2012-02-02 11:06:20.000000000 +0000 @@ -4014,13 +4014,11 @@ (gnus-activate-foreign-newsgroups level)) (gnus-group-get-new-news))) -(defun gnus-group-get-new-news (&optional arg one-level) +(defun gnus-group-get-new-news (&optional arg) "Get newly arrived articles. If ARG is a number, it specifies which levels you are interested in re-scanning. If ARG is non-nil and not a number, this will force -\"hard\" re-reading of the active files from all servers. -If ONE-LEVEL is not nil, then re-scan only the specified level, -otherwise all levels below ARG will be scanned too." +\"hard\" re-reading of the active files from all servers." (interactive "P") (require 'nnmail) (let ((gnus-inhibit-demon t) @@ -4034,7 +4032,7 @@ (unless gnus-slave (gnus-master-read-slave-newsrc)) - (gnus-get-unread-articles arg nil one-level) + (gnus-get-unread-articles arg) ;; If the user wants it, we scan for new groups. (when (eq gnus-check-new-newsgroups 'always) diff -aruN G/lisp/gnus-start.el E/lisp/gnus-start.el --- G/lisp/gnus-start.el 2012-02-01 00:20:10.000000000 +0000 +++ E/lisp/gnus-start.el 2012-01-29 21:57:57.000000000 +0000 @@ -1610,7 +1610,7 @@ ;; Go though `gnus-newsrc-alist' and compare with `gnus-active-hashtb' ;; and compute how many unread articles there are in each group. -(defun gnus-get-unread-articles (&optional level dont-connect one-level) +(defun gnus-get-unread-articles (&optional level dont-connect) (setq gnus-server-method-cache nil) (require 'gnus-agent) (let* ((newsrc (cdr gnus-newsrc-alist)) @@ -1667,7 +1667,7 @@ (push (setq method-group-list (list method method-type nil nil)) type-cache)) ;; Only add groups that need updating. - (if (funcall (if one-level #'= #'<=) (gnus-info-level info) + (if (<= (gnus-info-level info) (if (eq (cadr method-group-list) 'foreign) foreign-level alevel)) diff -aruN G/lisp/gnus.el E/lisp/gnus.el --- G/lisp/gnus.el 2012-02-01 23:19:49.000000000 +0000 +++ E/lisp/gnus.el 2012-02-01 23:21:21.000000000 +0000 @@ -6,6 +6,7 @@ ;; Author: Masanobu UMEDA ;; Lars Magne Ingebrigtsen ;; Keywords: news, mail +;; Version: 5.13 ;; This file is part of GNU Emacs. @@ -293,10 +294,10 @@ :link '(custom-manual "(gnus)Exiting Gnus") :group 'gnus) -(defconst gnus-version-number "0.20" +(defconst gnus-version-number "5.13" "Version number for this version of Gnus.") -(defconst gnus-version (format "No Gnus v%s" gnus-version-number) +(defconst gnus-version (format "Gnus v%s" gnus-version-number) "Version string for this version of Gnus.") (defcustom gnus-inhibit-startup-message nil diff -aruN G/lisp/message.el E/lisp/message.el --- G/lisp/message.el 2012-02-01 08:22:34.000000000 +0000 +++ E/lisp/message.el 2012-01-05 10:59:17.000000000 +0000 @@ -160,11 +160,7 @@ :group 'message-interface :type 'regexp) -(defcustom message-from-style 'default - ;; In Emacs 24.1 this defaults to the value of `mail-from-style' - ;; that defaults to: - ;; `angles' in Emacs 22.1~23.1, XEmacs 21.4, 21.5, and SXEmacs 22.1; - ;; `system-default' in Emacs 23.2, and 24.1 +(defcustom message-from-style mail-from-style "Specifies how \"From\" headers look. If nil, they contain just the return address like: @@ -451,11 +447,7 @@ :link '(custom-manual "(message)Various Commands") :group 'message-various) -(defcustom message-interactive t - ;; In Emacs 24.1 this defaults to the value of `mail-interactive' - ;; that defaults to: - ;; `nil' in Emacs 22.1~22.3, XEmacs 21.4, 21.5, and SXEmacs 22.1; - ;; `t' in Emacs 23.1~24.1 +(defcustom message-interactive mail-interactive "Non-nil means when sending a message wait for and display errors. A value of nil means let mailer mail back a message to report errors." :version "23.2" @@ -628,26 +620,7 @@ :link '(custom-manual "(message)Insertion Variables") :type 'regexp) -(defcustom message-cite-prefix-regexp - ;; In Emacs 24.1 this defaults to the value of - ;; `mail-citation-prefix-regexp'; the default value varies according - ;; to the Emacs version. In XEmacs 21.4 and 21.5, sendmail.el - ;; provides it. - (if (string-match "[[:digit:]]" "1") - ;; Support POSIX? XEmacs 21.5.27 doesn't. - "\\([ \t]*[_.[:word:]]+>+\\|[ \t]*[]>|]\\)+" - ;; ?-, ?_ or ?. MUST NOT be in syntax entry w. - (let (non-word-constituents) - (with-syntax-table text-mode-syntax-table - (setq non-word-constituents - (concat - (if (string-match "\\w" "_") "" "_") - (if (string-match "\\w" ".") "" ".")))) - (if (equal non-word-constituents "") - "\\([ \t]*\\(\\w\\)+>+\\|[ \t]*[]>|]\\)+" - (concat "\\([ \t]*\\(\\w\\|[" - non-word-constituents - "]\\)+>+\\|[ \t]*[]>|]\\)+")))) +(defcustom message-cite-prefix-regexp mail-citation-prefix-regexp "*Regexp matching the longest possible citation prefix on a line." :version "24.1" :group 'message-insertion @@ -841,10 +814,9 @@ :link '(custom-manual "(message)Mail Variables") :type 'boolean) -(defcustom message-sendmail-envelope-from nil - ;; In Emacs 24.1 this defaults to the value of `mail-envelope-from' - ;; if it is available, or defaults to nil. sendmail.el provides it; - ;; the default value is nil in all (X)Emacsen that Gnus supports. +(defcustom message-sendmail-envelope-from + ;; `mail-envelope-from' is unavailable unless sendmail.el is loaded. + (if (boundp 'mail-envelope-from) mail-envelope-from) "*Envelope-from when sending mail with sendmail. If this is nil, use `user-mail-address'. If it is the symbol `header', use the From: header of the message." @@ -1016,11 +988,7 @@ :version "23.1" ;; No Gnus :group 'message-insertion) -(defcustom message-yank-prefix "> " - ;; In Emacs 24.1 this defaults to the value of `mail-yank-prefix' - ;; that defaults to: - ;; `nil' in Emacs 22.1~23.1; - ;; "> " in Emacs 23.2, 24.1, XEmacs 21.4, 21.5, and SXEmacs 22.1 +(defcustom message-yank-prefix mail-yank-prefix "*Prefix inserted on the lines of yanked messages. Fix `message-cite-prefix-regexp' if it is set to an abnormal value. See also `message-yank-cited-prefix' and `message-yank-empty-prefix'." @@ -1046,11 +1014,7 @@ :link '(custom-manual "(message)Insertion Variables") :group 'message-insertion) -(defcustom message-indentation-spaces 3 - ;; In Emacs 24.1 this defaults to the value of - ;; `mail-indentation-spaces' that defaults to `3' in Emacs 22.1~24.1, - ;; and SXEmacs 22.1. In XEmacs 21.4 and 21.5, sendmail.el provides - ;; it; the defalut value is `3'. +(defcustom message-indentation-spaces mail-indentation-spaces "*Number of spaces to insert at the beginning of each cited line. Used by `message-yank-original' via `message-yank-cite'." :version "23.2" @@ -1080,11 +1044,7 @@ :link '(custom-manual "(message)Insertion Variables") :group 'message-insertion) -(defcustom message-signature t - ;; In Emacs 24.1 this defaults to the value of `mail-signature' that - ;; defaults to: - ;; `nil' in Emacs 22.1~23.1, XEmacs 21.4, 21.5, and SXEmacs 22.1; - ;; `t' in Emacs 23.2, and 24.1 +(defcustom message-signature mail-signature "*String to be inserted at the end of the message buffer. If t, the `message-signature-file' file will be inserted instead. If a function, the result from the function will be used instead. @@ -1094,11 +1054,7 @@ :link '(custom-manual "(message)Insertion Variables") :group 'message-insertion) -(defcustom message-signature-file "~/.signature" - ;; In Emacs 24.1 this defaults to the value of `mail-signature-file' - ;; that defaults to "~/.signature" in Emacs 22.1~24.1, and SXEmacs - ;; 22.1. In XEmacs 21.4 and 21.5, sendmail.el provides it; - ;; the defalut value is "~/.signature". +(defcustom message-signature-file mail-signature-file "*Name of file containing the text inserted at end of message buffer. Ignored if the named file doesn't exist. If nil, don't insert a signature. diff -aruN G/lisp/parse-time.el E/lisp/parse-time.el --- G/lisp/parse-time.el 2012-02-01 00:20:12.000000000 +0000 +++ E/lisp/parse-time.el 2012-01-05 10:59:17.043325000 +0000 @@ -36,9 +36,6 @@ (eval-when-compile (require 'cl)) ;and ah ain't kiddin' 'bout it -(eval-and-compile - (when (featurep 'xemacs) - (defvar parse-time-syntax (make-vector 256 nil)))) (defvar parse-time-digits (make-vector 256 nil)) ;; Byte-compiler warnings @@ -49,35 +46,18 @@ (loop for i from ?0 to ?9 do (aset parse-time-digits i (- i ?0)))) -(when (featurep 'xemacs) - (unless (aref parse-time-syntax ?0) - (loop for i from ?0 to ?9 - do (aset parse-time-syntax i ?0)) - (loop for i from ?A to ?Z - do (aset parse-time-syntax i ?A)) - (loop for i from ?a to ?z - do (aset parse-time-syntax i ?a)) - (aset parse-time-syntax ?+ 1) - (aset parse-time-syntax ?- -1) - (aset parse-time-syntax ?: ?d))) - (defsubst digit-char-p (char) (aref parse-time-digits char)) -(eval-and-compile - (if (featurep 'xemacs) - (defsubst parse-time-string-chars (char) - (and (< char (length parse-time-syntax)) - (aref parse-time-syntax char))) - (defsubst parse-time-string-chars (char) - (save-match-data - (let (case-fold-search str) - (cond ((eq char ?+) 1) - ((eq char ?-) -1) - ((eq char ?:) ?d) - ((string-match "[[:upper:]]" (setq str (string char))) ?A) - ((string-match "[[:lower:]]" str) ?a) - ((string-match "[[:digit:]]" str) ?0))))))) +(defsubst parse-time-string-chars (char) + (save-match-data + (let (case-fold-search str) + (cond ((eq char ?+) 1) + ((eq char ?-) -1) + ((eq char ?:) ?d) + ((string-match "[[:upper:]]" (setq str (string char))) ?A) + ((string-match "[[:lower:]]" str) ?a) + ((string-match "[[:digit:]]" str) ?0))))) (put 'parse-error 'error-conditions '(parse-error error)) (put 'parse-error 'error-message "Parsing error") diff -aruN G/lisp/pgg.el E/lisp/pgg.el --- G/lisp/pgg.el 2012-02-01 00:20:12.000000000 +0000 +++ E/lisp/pgg.el 2012-01-05 10:59:17.043325000 +0000 @@ -124,7 +124,7 @@ (put 'pgg-save-coding-system 'lisp-indent-function 2) (defmacro pgg-save-coding-system (start end &rest body) - `(if (interactive-p) + `(if (called-interactively-p 'interactive) (let ((buffer (current-buffer))) (with-temp-buffer (let (buffer-undo-list) @@ -318,7 +318,7 @@ (pgg-save-coding-system start end (pgg-invoke "encrypt-region" (or pgg-scheme pgg-default-scheme) (point-min) (point-max) rcpts sign passphrase)))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (pgg-display-output-buffer start end status)) status)) @@ -334,7 +334,7 @@ (pgg-invoke "encrypt-symmetric-region" (or pgg-scheme pgg-default-scheme) (point-min) (point-max) passphrase)))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (pgg-display-output-buffer start end status)) status)) @@ -351,7 +351,7 @@ (let* ((start (or start (point-min))) (end (or end (point-max))) (status (pgg-encrypt-symmetric-region start end passphrase))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (pgg-display-output-buffer start end status)) status)) @@ -370,7 +370,7 @@ (let* ((start (or start (point-min))) (end (or end (point-max))) (status (pgg-encrypt-region start end rcpts sign passphrase))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (pgg-display-output-buffer start end status)) status)) @@ -386,7 +386,7 @@ (pgg-save-coding-system start end (pgg-invoke "decrypt-region" (or pgg-scheme pgg-default-scheme) (point-min) (point-max) passphrase)))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (pgg-display-output-buffer start end status)) status)) @@ -403,7 +403,7 @@ (let* ((start (or start (point-min))) (end (or end (point-max))) (status (pgg-decrypt-region start end passphrase))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (pgg-display-output-buffer start end status)) status)) @@ -423,9 +423,10 @@ (let ((status (pgg-save-coding-system start end (pgg-invoke "sign-region" (or pgg-scheme pgg-default-scheme) (point-min) (point-max) - (or (interactive-p) cleartext) + (or (called-interactively-p 'interactive) + cleartext) passphrase)))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (pgg-display-output-buffer start end status)) status)) @@ -448,9 +449,10 @@ (let* ((start (or start (point-min))) (end (or end (point-max))) (status (pgg-sign-region start end - (or (interactive-p) cleartext) + (or (called-interactively-p 'interactive) + cleartext) passphrase))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (pgg-display-output-buffer start end status)) status)) @@ -478,7 +480,7 @@ pgg-query-keyserver (setq key (concat "0x" (pgg-truncate-key-identifier key))) (null (pgg-lookup-key key)) - (or fetch (interactive-p)) + (or fetch (called-interactively-p 'interactive)) (y-or-n-p (format "Key %s not found; attempt to fetch? " key)) (setq keyserver (or (cdr (assq 'preferred-key-server packet)) @@ -488,7 +490,7 @@ (pgg-save-coding-system start end (pgg-invoke "verify-region" (or pgg-scheme pgg-default-scheme) (point-min) (point-max) signature))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (let ((temp-buffer-show-function (function pgg-temp-buffer-show-function))) (with-output-to-temp-buffer pgg-echo-buffer @@ -510,7 +512,7 @@ (let* ((start (or start (point-min))) (end (or end (point-max))) (status (pgg-verify-region start end signature fetch))) - (when (interactive-p) + (when (called-interactively-p 'interactive) (let ((temp-buffer-show-function (function pgg-temp-buffer-show-function))) (with-output-to-temp-buffer pgg-echo-buffer diff -aruN G/lisp/spam.el E/lisp/spam.el --- G/lisp/spam.el 2012-02-01 00:20:13.000000000 +0000 +++ E/lisp/spam.el 2012-01-05 10:59:17.000000000 +0000 @@ -2088,6 +2088,11 @@ ;; all this is done inside a condition-case to trap errors +(eval-when-compile + (autoload 'bbdb-buffer "bbdb") + (autoload 'bbdb-create-internal "bbdb") + (autoload 'bbdb-search-simple "bbdb")) + ;; Autoloaded in message, which we require. (declare-function gnus-extract-address-components "gnus-util" (from)) @@ -2099,13 +2104,9 @@ (file-error ;; `bbdb-records' should not be bound as an autoload function ;; before loading bbdb because of `bbdb-hashtable-size'. - (defalias 'bbdb-buffer 'ignore) - (defalias 'bbdb-create-internal 'ignore) (defalias 'bbdb-records 'ignore) (defalias 'spam-BBDB-register-routine 'ignore) (defalias 'spam-enter-ham-BBDB 'ignore) - (defalias 'spam-exists-in-BBDB-p 'ignore) - (defalias 'bbdb-gethash 'ignore) nil)) ;; when the BBDB changes, we want to clear out our cache @@ -2125,7 +2126,7 @@ 'ignore)) (net-address (nth 1 parsed-address)) (record (and net-address - (spam-exists-in-BBDB-p net-address)))) + (bbdb-search-simple nil net-address)))) (when net-address (gnus-message 6 "%s address %s %s BBDB" (if remove "Deleting" "Adding") @@ -2147,17 +2148,15 @@ (defun spam-BBDB-unregister-routine (articles) (spam-BBDB-register-routine articles t)) - (defsubst spam-exists-in-BBDB-p (net) - (when (and (stringp net) (not (zerop (length net)))) - (bbdb-records) - (bbdb-gethash (downcase net)))) - (defun spam-check-BBDB () "Mail from people in the BBDB is classified as ham or non-spam" - (let ((net (message-fetch-field "from"))) - (when net - (setq net (nth 1 (gnus-extract-address-components net))) - (if (spam-exists-in-BBDB-p net) + (let ((who (message-fetch-field "from"))) + (when who + (setq who (nth 1 (gnus-extract-address-components who))) + (if + (if (fboundp 'bbdb-search) + (bbdb-search (bbdb-records) who) ;; v3 + (bbdb-search-simple nil who)) ;; v2 t (if spam-use-BBDB-exclusive spam-split-group diff -aruN G/texi/auth.texi E/texi/auth.texi --- G/texi/auth.texi 2012-02-01 00:20:13.000000000 +0000 +++ E/texi/auth.texi 2012-01-05 10:59:17.000000000 +0000 @@ -2,7 +2,7 @@ @include gnus-overrides.texi -@setfilename auth +@setfilename ../../info/auth @settitle Emacs auth-source Library @value{VERSION} @set VERSION 0.3 diff -aruN G/texi/emacs-mime.texi E/texi/emacs-mime.texi --- G/texi/emacs-mime.texi 2012-02-01 00:20:13.000000000 +0000 +++ E/texi/emacs-mime.texi 2012-01-05 10:59:17.000000000 +0000 @@ -2,7 +2,7 @@ @include gnus-overrides.texi -@setfilename emacs-mime +@setfilename ../../info/emacs-mime @settitle Emacs MIME Manual @synindex fn cp @synindex vr cp diff -aruN G/texi/gnus.texi E/texi/gnus.texi --- G/texi/gnus.texi 2012-02-01 08:22:34.000000000 +0000 +++ E/texi/gnus.texi 2012-01-30 23:27:20.000000000 +0000 @@ -2,7 +2,7 @@ @include gnus-overrides.texi -@setfilename gnus +@setfilename ../../info/gnus @settitle Gnus Manual @syncodeindex fn cp @syncodeindex vr cp @@ -47,7 +47,7 @@ \begin{document} % Adjust ../Makefile.in if you change the following line: -\newcommand{\gnusversionname}{No Gnus v0.20} +\newcommand{\gnusversionname}{Gnus v5.13} \newcommand{\gnuschaptername}{} \newcommand{\gnussectionname}{} @@ -358,7 +358,7 @@ luck. @c Adjust ../Makefile.in if you change the following line: -This manual corresponds to No Gnus v0.20 +This manual corresponds to Gnus v5.13 @ifnottex @insertcopying @@ -392,7 +392,7 @@ the program. @c Adjust ../Makefile.in if you change the following line: -This manual corresponds to No Gnus v0.20 +This manual corresponds to Gnus v5.13 @heading Other related manuals @itemize @@ -28901,7 +28901,7 @@ @item Try doing an @kbd{M-x gnus-version}. If you get something that looks like @c -@samp{No Gnus v0.20} @c Adjust ../Makefile.in if you change this line! +@samp{Gnus v5.13} @c Adjust ../Makefile.in if you change this line! @c you have the right files loaded. Otherwise you have some old @file{.el} files lying around. Delete these. diff -aruN G/texi/message.texi E/texi/message.texi --- G/texi/message.texi 2012-02-01 08:22:34.000000000 +0000 +++ E/texi/message.texi 2012-01-05 10:59:17.000000000 +0000 @@ -2,7 +2,7 @@ @include gnus-overrides.texi -@setfilename message +@setfilename ../../info/message @settitle Message Manual @synindex fn cp @synindex vr cp @@ -77,7 +77,7 @@ @c Adjust ../Makefile.in if you change the following lines: Message is distributed with Gnus. The Gnus distribution @c -corresponding to this manual is No Gnus v0.20 +corresponding to this manual is Gnus v5.13 @node Interface diff -aruN G/texi/pgg.texi E/texi/pgg.texi --- G/texi/pgg.texi 2012-02-01 00:20:15.000000000 +0000 +++ E/texi/pgg.texi 2012-01-05 10:59:17.000000000 +0000 @@ -2,7 +2,7 @@ @include gnus-overrides.texi -@setfilename pgg +@setfilename ../../info/pgg @settitle PGG @value{VERSION} @set VERSION 0.1 diff -aruN G/texi/sasl.texi E/texi/sasl.texi --- G/texi/sasl.texi 2012-02-01 00:20:15.000000000 +0000 +++ E/texi/sasl.texi 2012-01-05 10:59:17.000000000 +0000 @@ -2,7 +2,7 @@ @include gnus-overrides.texi -@setfilename sasl.info +@setfilename ../../info/sasl @set VERSION 0.2 @settitle Emacs SASL Library @value{VERSION} diff -aruN G/texi/sieve.texi E/texi/sieve.texi --- G/texi/sieve.texi 2012-02-01 00:20:15.000000000 +0000 +++ E/texi/sieve.texi 2012-01-05 10:59:17.000000000 +0000 @@ -2,7 +2,7 @@ @include gnus-overrides.texi -@setfilename sieve +@setfilename ../../info/sieve @settitle Emacs Sieve Manual @synindex fn cp @synindex vr cp