changeset 97530:920b055d2ec5

Notes on changes made to merge from the Rmail/mbox branch into the trunk.

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/mail/mbox-changes/rmail.el.changes	Mon Aug 18 05:18:52 2008 +0000
@@ -0,0 +1,1759 @@
+RCS file: /cvsroot/emacs/emacs/lisp/mail/rmail.el,v
+Working file: rmail.el
+head: 1.454
+branch:
+locks: strict
+access list:
+symbolic names:
+	remove-vms: 1.454
+	before-remove-vms: 1.454
+	remove-carbon: 1.454
+	before-remove-carbon: 1.454
+	before-merge-emacs-app-to-trunk: 1.454
+	font-backend: 1.453.0.2
+	font-backend-base: 1.453
+	EMACS_22_2: 1.433.2.10
+	EMACS_PRETEST_22_1_92: 1.433.2.10
+	lisp-bob: 1.452
+	EMACS_PRETEST_22_1_91: 1.433.2.9
+	merge-unicode-to-trunk: 1.447
+	before-merge-unicode-to-trunk: 1.446
+	EMACS_PRETEST_22_1_90: 1.433.2.8
+	lexbind-base: 1.454
+	merge-multi-tty-to-trunk: 1.439
+	before-merge-multi-tty-to-trunk: 1.439
+	EMACS_22_1: 1.433.2.1
+	EMACS_PRETEST_22_0_990: 1.433.2.1
+	multi-tty: 1.433.0.4
+	multi-tty-base: 1.439
+	EMACS_22_BRANCHPOINT: 1.433.2.1
+	EMACS_PRETEST_22_0_99: 1.433
+	EMACS_22_BASE: 1.433.0.2
+	EMACS_PRETEST_22_0_98: 1.433
+	EMACS_PRETEST_22_0_97: 1.433
+	EMACS_PRETEST_22_0_96: 1.432
+	EMACS_PRETEST_22_0_95: 1.432
+	EMACS_PRETEST_22_0_94: 1.431
+	EMACS_PRETEST_22_0_93: 1.431
+	EMACS_PRETEST_22_0_92: 1.430
+	EMACS_PRETEST_22_0_91: 1.430
+	EMACS_PRETEST_22_0_90: 1.429
+	unicode-post-font-backend: 1.371.4.29
+	unicode-pre-font-backend: 1.371.4.29
+	unicode-xft: 1.371.4.27.0.2
+	unicode-xft-base: 1.371.4.38
+	ttn-vms-21-2-B4: 1.349.4.3
+	ttn-vms-21-2-B3: 1.349.4.3
+	ttn-vms-21-2-B2: 1.349.4.3
+	XFT_JHD_BRANCH_base: 1.397
+	XFT_JHD_BRANCH: 1.397.0.2
+	EMACS_19_34: 1.194
+	after-merge-gnus-5_10: 1.392
+	before-merge-gnus-5_10: 1.392
+	gnus-5_10-post-merge-josefsson: 1.391
+	gnus-5_10-pre-merge-josefsson: 1.391
+	gnus-5_10-post-merge-yamaoka: 1.391
+	gnus-5_10-pre-merge-yamaoka: 1.391
+	gnus-5_10-branch: 1.391.0.2
+	gnus-5_10-branchpoint: 1.392
+	emacs-unicode-2-pre-sync: 1.371.4.3
+	ttn-vms-21-3-stash: 1.349.4.5.0.2
+	ttn-vms-21-2-stash: 1.349.4.3.0.2
+	EMACS_21_2: 1.349.4.3
+	handa-temp-tag: 1.387
+	emacs-bidi: 1.371.0.6
+	emacs-bidi-base: 1.371
+	emacs-unicode-2: 1.371.0.4
+	emacs-unicode-2-base: 1.446
+	Boehm-GC: 1.371.0.2
+	Boehm-GC-base: 1.371
+	EMACS_21_3: 1.349.4.5
+	rmail-mbox-branch: 1.368.0.2
+	RMAIL-MBOX-BASE: 1.368
+	EMACS_PRETEST_21_2_95: 1.349.4.5
+	EMACS_PRETEST_21_2_94: 1.349.4.5
+	EMACS_PRETEST_21_2_93: 1.349.4.5
+	EMACS_PRETEST_21_2_92: 1.349.4.5
+	EMACS_PRETEST_21_2_91: 1.349.4.5
+	lexbind: 1.360.0.2
+	emacs-unicode: 1.355.0.2
+	emacs-unicode-base: 1.355
+	fx-branch-base: 1.328
+	EMACS_21_1: 1.349
+	EMACS_21_1_RC: 1.349.0.4
+	EMACS_21_1_BASE: 1.349
+	patches_21_0: 1.349.0.2
+	patches_21_0_base: 1.349
+	EMACS_PRETEST_21_0_106: 1.349
+	EMACS_PRETEST_21_0_105: 1.348
+	EMACS_PRETEST_21_0_104: 1.347
+	EMACS_20_2: 1.236
+	gerd_big: 1.341.0.8
+	gerd_int: 1.341.0.6
+	gerd_dbe: 1.341.0.4
+	gerd_defvaralias: 1.341.0.2
+	EMACS_20_4: 1.305
+	EMACS_PRETEST_21_0_103: 1.339
+	EMACS_PRETEST_21_0_102: 1.333
+	EMACS_PRETEST_21_0_101: 1.333
+	EMACS_PRETEST_21_0_100: 1.332
+	EMACS_PRETEST_21_0_99: 1.329
+	EMACS_PRETEST_21_0_98: 1.329
+	fx-branch: 1.328.0.2
+	EMACS_PRETEST_21_0_97: 1.328
+	EMACS_PRETEST_21_0_96: 1.327
+	EMACS_PRETEST_21_0_95: 1.325
+	EMACS_PRETEST_21_0_93: 1.325
+	EMACS_PRETEST_21_0_92: 1.323
+	EMACS_PRETEST_21_0_91: 1.321
+	EMACS_PRETEST_21_0_90: 1.321
+keyword substitution: kv
+total revisions: 661;	selected revisions: 661
+description:
+;;; rmail.el --- main code of "RMAIL" mail reader for Emacs.
+----------------------------
+revision 1.454 (patched)
+date: 2008-05-06 07:22:26 +0000;  author: gm;  state: Exp;  lines: +4 -6;  commitid: nPdVwGEZ0V6bhS1t;
+Switch to recommended form of GPLv3 permissions notice.
+----------------------------
+revision 1.453 (applied)
+date: 2008-04-10 14:10:19 +0000;  author: monnier;  state: Exp;  lines: +1 -1;  commitid: vwbWV2GwRKWGmzYs;
+Fix up comment convention on the arch-tag lines.
+----------------------------
+revision 1.452 (applied)
+date: 2008-02-20 05:59:41 +0000;  author: gm;  state: Exp;  lines: +9 -1;  commitid: afzSfvXamNShg6Ss;
+(rmail-autodetect): Add .exe extension to movemail on Windows.
+----------------------------
+revision 1.451 (patched)
+date: 2008-02-13 20:58:26 +0000;  author: bastien1;  state: Exp;  lines: +13 -15;  commitid: lqRKtg2wkubzshRs;
+;;; smtpmail.el --- simple SMTP protocol (RFC 821) for sending mail
+
+;; Copyright (C) 1995, 1996, 2001, 2002, 2003, 2004, 2005,
+;;   2006, 2007, 2008 Free Software Foundation, Inc.
+
+;; Author: Tomoji Kagatani <[e-mail]>
+;; Maintainer: Simon Josefsson <[e-mail]>
+;; w32 Maintainer: Brian D. Carlstrom <[e-mail]>
+;; ESMTP support: Simon Leinen <[e-mail]>
+;; Hacked by Mike Taylor, 11th October 1999 to add support for
+;; automatically appending a domain to RCPT TO: addresses.
+;; AUTH=LOGIN support: Stephen Cranefield <[e-mail]>
+;; Keywords: mail
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
+
+;;; Commentary:
+
+;; Send Mail to smtp host from smtpmail temp buffer.
+
+;; Please add these lines in your .emacs(_emacs) or use customize.
+;;
+;;(setq send-mail-function 'smtpmail-send-it) ; if you use `mail'
+;;(setq message-send-mail-function 'smtpmail-send-it) ; if you use message/Gnus
+;;(setq smtpmail-default-smtp-server "YOUR SMTP HOST")
+;;(setq smtpmail-local-domain "YOUR DOMAIN NAME")
+;;(setq smtpmail-sendto-domain "YOUR DOMAIN NAME")
+;;(setq smtpmail-debug-info t) ; only to debug problems
+;;(setq smtpmail-auth-credentials  ; or use ~/.authinfo
+;;      '(("YOUR SMTP HOST" 25 "username" "password")))
+;;(setq smtpmail-starttls-credentials
+;;      '(("YOUR SMTP HOST" 25 "~/.my_smtp_tls.key" "~/.my_smtp_tls.cert")))
+;; Where the 25 equals the value of `smtpmail-smtp-service', it can be an
+;; integer or a string, just as long as they match (eq).
+
+;; To queue mail, set smtpmail-queue-mail to t and use
+;; smtpmail-send-queued-mail to send.
+
+;; Modified by Stephen Cranefield <[e-mail]>,
+;; 22/6/99, to support SMTP Authentication by the AUTH=LOGIN mechanism.
+;; See http://help.netscape.com/products/server/messaging/3x/info/smtpauth.html
+;; Rewritten by Simon Josefsson to use same credential variable as AUTH
+;; support below.
+
+;; Modified by Simon Josefsson <[e-mail]>, 22/2/99, to support SMTP
+;; Authentication by the AUTH mechanism.
+;; See http://www.ietf.org/rfc/rfc2554.txt
+
+;; Modified by Simon Josefsson <[e-mail]>, 2000-10-07, to support
+;; STARTTLS.  Requires external program
+;; ftp://ftp.opaopa.org/pub/elisp/starttls-*.tar.gz.
+;; See http://www.ietf.org/rfc/rfc2246.txt, http://www.ietf.org/rfc/rfc2487.txt
+
+;;; Code:
+
+(require 'sendmail)
+(autoload 'starttls-open-stream "starttls")
+(autoload 'starttls-negotiate "starttls")
+(autoload 'mail-strip-quoted-names "mail-utils")
+(autoload 'message-make-date "message")
+(autoload 'message-make-message-id "message")
+(autoload 'rfc2104-hash "rfc2104")
+(autoload 'netrc-parse "netrc")
+(autoload 'netrc-machine "netrc")
+(autoload 'netrc-get "netrc")
+
+;;;
+(defgroup smtpmail nil
+  "SMTP protocol for sending mail."
+  :group 'mail)
+
+
+(defcustom smtpmail-default-smtp-server nil
+  "*Specify default SMTP server.
+This only has effect if you specify it before loading the smtpmail library."
+  :type '(choice (const nil) string)
+  :group 'smtpmail)
+
+(defcustom smtpmail-smtp-server
+  (or (getenv "SMTPSERVER") smtpmail-default-smtp-server)
+  "*The name of the host running SMTP server."
+  :type '(choice (const nil) string)
+  :group 'smtpmail)
+
+(defcustom smtpmail-smtp-service 25
+  "*SMTP service port number.
+The default value would be \"smtp\" or 25."
+  :type '(choice (integer :tag "Port") (string :tag "Service"))
+  :group 'smtpmail)
+
+(defcustom smtpmail-local-domain nil
+  "*Local domain name without a host name.
+If the function `system-name' returns the full internet address,
+don't define this value."
+  :type '(choice (const nil) string)
+  :group 'smtpmail)
+
+(defcustom smtpmail-sendto-domain nil
+  "*Local domain name without a host name.
+This is appended (with an @-sign) to any specified recipients which do
+not include an @-sign, so that each RCPT TO address is fully qualified.
+\(Some configurations of sendmail require this.)
+
+Don't bother to set this unless you have get an error like:
+	Sending failed; SMTP protocol error
+when sending mail, and the *trace of SMTP session to <somewhere>*
+buffer includes an exchange like:
+	RCPT TO: <someone>
+	501 <someone>: recipient address must contain a domain
+"
+  :type '(choice (const nil) string)
+  :group 'smtpmail)
+
+(defcustom smtpmail-debug-info nil
+  "Whether to print info in buffer *trace of SMTP session to <somewhere>*.
+See also `smtpmail-debug-verb' which determines if the SMTP protocol should
+be verbose as well."
+  :type 'boolean
+  :group 'smtpmail)
+
+(defcustom smtpmail-debug-verb nil
+  "Whether this library sends the SMTP VERB command or not.
+The commands enables verbose information from the SMTP server."
+  :type 'boolean
+  :group 'smtpmail)
+
+(defcustom smtpmail-code-conv-from nil ;; *junet*
+  "*smtpmail code convert from this code to *internal*..for tiny-mime.."
+  :type 'boolean
+  :group 'smtpmail)
+
+(defcustom smtpmail-queue-mail nil
+  "*If set, mail is queued; otherwise it is sent immediately.
+If queued, it is stored in the directory `smtpmail-queue-dir'
+and sent with `smtpmail-send-queued-mail'."
+  :type 'boolean
+  :group 'smtpmail)
+
+(defcustom smtpmail-queue-dir "~/Mail/queued-mail/"
+  "*Directory where `smtpmail.el' stores queued mail."
+  :type 'directory
+  :group 'smtpmail)
+
+(defcustom smtpmail-auth-credentials "~/.authinfo"
+  "Specify username and password for servers, directly or via .netrc file.
+This variable can either be a filename pointing to a file in netrc(5)
+format, or list of four-element lists that contain, in order,
+`servername' (a string), `port' (an integer), `user' (a string) and
+`password' (a string, or nil to query the user when needed).  If you
+need to enter a `realm' too, add it to the user string, so that it
+looks like `user@realm'."
+  :type '(choice file
+		 (repeat (list (string  :tag "Server")
+		       (integer :tag "Port")
+		       (string  :tag "Username")
+		       (choice (const :tag "Query when needed" nil)
+				       (string  :tag "Password")))))
+  :version "22.1"
+  :group 'smtpmail)
+
+(defcustom smtpmail-starttls-credentials '(("" 25 "" ""))
+  "Specify STARTTLS keys and certificates for servers.
+This is a list of four-element list with `servername' (a string),
+`port' (an integer), `key' (a filename) and `certificate' (a
+filename).
+If you do not have a certificate/key pair, leave the `key' and
+`certificate' fields as `nil'.  A key/certificate pair is only
+needed if you want to use X.509 client authenticated
+connections."
+  :type '(repeat (list (string  :tag "Server")
+		       (integer :tag "Port")
+		       (file    :tag "Key")
+		       (file    :tag "Certificate")))
+  :version "21.1"
+  :group 'smtpmail)
+
+(defcustom smtpmail-warn-about-unknown-extensions nil
+  "*If set, print warnings about unknown SMTP extensions.
+This is mainly useful for development purposes, to learn about
+new SMTP extensions that might be useful to support."
+  :type 'boolean
+  :version "21.1"
+  :group 'smtpmail)
+
+(defvar smtpmail-queue-index-file "index"
+  "File name of queued mail index.
+This is relative to `smtpmail-queue-dir'.")
+
+(defvar smtpmail-address-buffer)
+(defvar smtpmail-recipient-address-list)
+
+(defvar smtpmail-queue-counter 0)
+
+;; Buffer-local variable.
+(defvar smtpmail-read-point)
+
+(defvar smtpmail-queue-index (concat smtpmail-queue-dir
+				     smtpmail-queue-index-file))
+
+(defconst smtpmail-auth-supported '(cram-md5 plain login)
+  "List of supported SMTP AUTH mechanisms.")
+
+;;;
+;;;
+;;;
+
+(defvar smtpmail-mail-address nil
+  "Value to use for envelope-from address for mail from ambient buffer.")
+
+;;;###autoload
+(defun smtpmail-send-it ()
+  (let ((errbuf (if mail-interactive
+		    (generate-new-buffer " smtpmail errors")
+		  0))
+	(tembuf (generate-new-buffer " smtpmail temp"))
+	(case-fold-search nil)
+	delimline
+	(mailbuf (current-buffer))
+        ;; Examine this variable now, so that
+	;; local binding in the mail buffer will take effect.
+	(smtpmail-mail-address
+         (or (and mail-specify-envelope-from (mail-envelope-from))
+             user-mail-address))
+	(smtpmail-code-conv-from
+	 (if enable-multibyte-characters
+	     (let ((sendmail-coding-system smtpmail-code-conv-from))
+	       (select-message-coding-system)))))
+    (unwind-protect
+	(save-excursion
+	  (set-buffer tembuf)
+	  (erase-buffer)
+	  ;; Use the same buffer-file-coding-system as in the mail
+	  ;; buffer, otherwise any write-region invocations (e.g., in
+	  ;; mail-do-fcc below) will annoy with asking for a suitable
+	  ;; encoding.
+	  (set-buffer-file-coding-system smtpmail-code-conv-from nil t)
+	  (insert-buffer-substring mailbuf)
+	  (goto-char (point-max))
+	  ;; require one newline at the end.
+	  (or (= (preceding-char) ?\n)
+	      (insert ?\n))
+	  ;; Change header-delimiter to be what sendmail expects.
+	  (mail-sendmail-undelimit-header)
+	  (setq delimline (point-marker))
+;;	  (sendmail-synch-aliases)
+	  (if mail-aliases
+	      (expand-mail-aliases (point-min) delimline))
+	  (goto-char (point-min))
+	  ;; ignore any blank lines in the header
+	  (while (and (re-search-forward "\n\n\n*" delimline t)
+		      (< (point) delimline))
+	    (replace-match "\n"))
+	  (let ((case-fold-search t))
+	    ;; We used to process Resent-... headers here,
+	    ;; but it was not done properly, and the job
+	    ;; is done correctly in smtpmail-deduce-address-list.
+	    ;; Don't send out a blank subject line
+	    (goto-char (point-min))
+	    (if (re-search-forward "^Subject:\\([ \t]*\n\\)+\\b" delimline t)
+		(replace-match "")
+	      ;; This one matches a Subject just before the header delimiter.
+	      (if (and (re-search-forward "^Subject:\\([ \t]*\n\\)+" delimline t)
+		       (= (match-end 0) delimline))
+		  (replace-match "")))
+	    ;; Put the "From:" field in unless for some odd reason
+	    ;; they put one in themselves.
+	    (goto-char (point-min))
+	    (if (not (re-search-forward "^From:" delimline t))
+		(let* ((login smtpmail-mail-address)
+		       (fullname (user-full-name)))
+		  (cond ((eq mail-from-style 'angles)
+			 (insert "From: " fullname)
+			 (let ((fullname-start (+ (point-min) 6))
+			       (fullname-end (point-marker)))
+			   (goto-char fullname-start)
+			   ;; Look for a character that cannot appear unquoted
+			   ;; according to RFC 822.
+			   (if (re-search-forward "[^- !#-'*+/-9=?A-Z^-~]"
+						  fullname-end 1)
+			       (progn
+				 ;; Quote fullname, escaping specials.
+				 (goto-char fullname-start)
+				 (insert "\"")
+				 (while (re-search-forward "[\"\\]"
+							   fullname-end 1)
+				   (replace-match "\\\\\\&" t))
+				 (insert "\""))))
+			 (insert " <" login ">\n"))
+			((eq mail-from-style 'parens)
+			 (insert "From: " login " (")
+			 (let ((fullname-start (point)))
+			   (insert fullname)
+			   (let ((fullname-end (point-marker)))
+			     (goto-char fullname-start)
+			     ;; RFC 822 says \ and nonmatching parentheses
+			     ;; must be escaped in comments.
+			     ;; Escape every instance of ()\ ...
+			     (while (re-search-forward "[()\\]" fullname-end 1)
+			       (replace-match "\\\\\\&" t))
+			     ;; ... then undo escaping of matching parentheses,
+			     ;; including matching nested parentheses.
+			     (goto-char fullname-start)
+			     (while (re-search-forward
+				     "\\(\\=\\|[^\\]\\(\\\\\\\\\\)*\\)\\\\(\\(\\([^\\]\\|\\\\\\\\\\)*\\)\\\\)"
+				     fullname-end 1)
+			       (replace-match "\\1(\\3)" t)
+			       (goto-char fullname-start))))
+			 (insert ")\n"))
+			((null mail-from-style)
+			 (insert "From: " login "\n")))))
+	    ;; Insert a `Message-Id:' field if there isn't one yet.
+	    (goto-char (point-min))
+	    (unless (re-search-forward "^Message-Id:" delimline t)
+	      (insert "Message-Id: " (message-make-message-id) "\n"))
+	    ;; Insert a `Date:' field if there isn't one yet.
+	    (goto-char (point-min))
+	    (unless (re-search-forward "^Date:" delimline t)
+	      (insert "Date: " (message-make-date) "\n"))
+	    ;; Possibly add a MIME header for the current coding system
+	    (let (charset)
+	      (goto-char (point-min))
+	      (and (eq mail-send-nonascii 'mime)
+		   (not (re-search-forward "^MIME-version:" delimline t))
+		   (progn (skip-chars-forward "\0-\177")
+			  (/= (point) (point-max)))
+		   smtpmail-code-conv-from
+		   (setq charset
+			 (coding-system-get smtpmail-code-conv-from
+					    'mime-charset))
+		   (goto-char delimline)
+		   (insert "MIME-version: 1.0\n"
+			   "Content-type: text/plain; charset="
+			   (symbol-name charset)
+			   "\nContent-Transfer-Encoding: 8bit\n")))
+	    ;; Insert an extra newline if we need it to work around
+	    ;; Sun's bug that swallows newlines.
+	    (goto-char (1+ delimline))
+	    (if (eval mail-mailer-swallows-blank-line)
+		(newline))
+	    ;; Find and handle any FCC fields.
+	    (goto-char (point-min))
+	    (if (re-search-forward "^FCC:" delimline t)
+		;; Force mail-do-fcc to use the encoding of the mail
+		;; buffer to encode outgoing messages on FCC files.
+		(let ((coding-system-for-write smtpmail-code-conv-from))
+		  (mail-do-fcc delimline)))
+	    (if mail-interactive
+		(with-current-buffer errbuf
+		  (erase-buffer))))
+	  ;;
+	  ;;
+	  ;;
+	  (setq smtpmail-address-buffer (generate-new-buffer "*smtp-mail*"))
+	  (setq smtpmail-recipient-address-list
+		    (smtpmail-deduce-address-list tembuf (point-min) delimline))
+	  (kill-buffer smtpmail-address-buffer)
+
+	  (smtpmail-do-bcc delimline)
+	  ; Send or queue
+	  (if (not smtpmail-queue-mail)
+	      (if (not (null smtpmail-recipient-address-list))
+		  (if (not (smtpmail-via-smtp
+			    smtpmail-recipient-address-list tembuf))
+		      (error "Sending failed; SMTP protocol error"))
+		(error "Sending failed; no recipients"))
+	    (let* ((file-data
+		    (expand-file-name
+		     (format "%s_%i"
+			     (format-time-string "%Y-%m-%d_%H:%M:%S")
+			     (setq smtpmail-queue-counter
+				   (1+ smtpmail-queue-counter)))
+		     smtpmail-queue-dir))
+		   (file-data (convert-standard-filename file-data))
+		   (file-elisp (concat file-data ".el"))
+		   (buffer-data (create-file-buffer file-data))
+		   (buffer-elisp (create-file-buffer file-elisp))
+		   (buffer-scratch "*queue-mail*"))
+	      (unless (file-exists-p smtpmail-queue-dir)
+		(make-directory smtpmail-queue-dir t))
+	      (with-current-buffer buffer-data
+		(erase-buffer)
+		(set-buffer-file-coding-system smtpmail-code-conv-from nil t)
+		(insert-buffer-substring tembuf)
+		(write-file file-data)
+		(set-buffer buffer-elisp)
+		(erase-buffer)
+		(insert (concat
+			 "(setq smtpmail-recipient-address-list '"
+			 (prin1-to-string smtpmail-recipient-address-list)
+			 ")\n"))
+		(write-file file-elisp)
+		(set-buffer (generate-new-buffer buffer-scratch))
+		(insert (concat file-data "\n"))
+		(append-to-file (point-min)
+				(point-max)
+				smtpmail-queue-index)
+		)
+	      (kill-buffer buffer-scratch)
+	      (kill-buffer buffer-data)
+	      (kill-buffer buffer-elisp))))
+      (kill-buffer tembuf)
+      (if (bufferp errbuf)
+	  (kill-buffer errbuf)))))
+
+;;;###autoload
+(defun smtpmail-send-queued-mail ()
+  "Send mail that was queued as a result of setting `smtpmail-queue-mail'."
+  (interactive)
+  (with-temp-buffer
+    ;;; Get index, get first mail, send it, update index, get second
+    ;;; mail, send it, etc...
+    (let ((file-msg ""))
+      (insert-file-contents smtpmail-queue-index)
+      (goto-char (point-min))
+      (while (not (eobp))
+	(setq file-msg (buffer-substring (point) (line-end-position)))
+	(load file-msg)
+	;; Insert the message literally: it is already encoded as per
+	;; the MIME headers, and code conversions might guess the
+	;; encoding wrongly.
+	(with-temp-buffer
+	  (let ((coding-system-for-read 'no-conversion))
+	    (insert-file-contents file-msg))
+          (let ((smtpmail-mail-address
+                 (or (and mail-specify-envelope-from (mail-envelope-from))
+                     user-mail-address)))
+            (if (not (null smtpmail-recipient-address-list))
+                (if (not (smtpmail-via-smtp smtpmail-recipient-address-list
+                                            (current-buffer)))
+                    (error "Sending failed; SMTP protocol error"))
+              (error "Sending failed; no recipients"))))
+	(delete-file file-msg)
+	(delete-file (concat file-msg ".el"))
+	(delete-region (point-at-bol) (point-at-bol 2)))
+      (write-region (point-min) (point-max) smtpmail-queue-index))))
+
+;(defun smtpmail-via-smtp (host,port,sender,destination,smtpmail-text-buffer)
+
+(defun smtpmail-fqdn ()
+  (if smtpmail-local-domain
+      (concat (system-name) "." smtpmail-local-domain)
+    (system-name)))
+
+(defsubst smtpmail-cred-server (cred)
+  (nth 0 cred))
+
+(defsubst smtpmail-cred-port (cred)
+  (nth 1 cred))
+
+(defsubst smtpmail-cred-key (cred)
+  (nth 2 cred))
+
+(defsubst smtpmail-cred-user (cred)
+  (nth 2 cred))
+
+(defsubst smtpmail-cred-cert (cred)
+  (nth 3 cred))
+
+(defsubst smtpmail-cred-passwd (cred)
+  (nth 3 cred))
+
+(defun smtpmail-find-credentials (cred server port)
+  (catch 'done
+    (let ((l cred) el)
+      (while (setq el (pop l))
+	(when (and (equal server (smtpmail-cred-server el))
+		   (equal port (smtpmail-cred-port el)))
+	  (throw 'done el))))))
+
+(defun smtpmail-maybe-append-domain (recipient)
+  (if (or (not smtpmail-sendto-domain)
+	  (string-match "@" recipient))
+      recipient
+    (concat recipient "@" smtpmail-sendto-domain)))
+
+(defun smtpmail-intersection (list1 list2)
+  (let ((result nil))
+    (dolist (el2 list2)
+      (when (memq el2 list1)
+	(push el2 result)))
+    (nreverse result)))
+
+(defvar starttls-extra-args)
+(defvar starttls-extra-arguments)
+
+(defun smtpmail-open-stream (process-buffer host port)
+  (let ((cred (smtpmail-find-credentials
+	       smtpmail-starttls-credentials host port)))
+    (if (null (and cred (condition-case ()
+			    (with-no-warnings
+			      (require 'starttls)
+			      (call-process (if starttls-use-gnutls
+						starttls-gnutls-program
+					      starttls-program)))
+			  (error nil))))
+	;; The normal case.
+	(open-network-stream "SMTP" process-buffer host port)
+      (let* ((cred-key (smtpmail-cred-key cred))
+	     (cred-cert (smtpmail-cred-cert cred))
+	     (starttls-extra-args
+	      (append
+	       starttls-extra-args
+	       (when (and (stringp cred-key) (stringp cred-cert)
+			  (file-regular-p
+			   (setq cred-key (expand-file-name cred-key)))
+			  (file-regular-p
+			   (setq cred-cert (expand-file-name cred-cert))))
+		 (list "--key-file" cred-key "--cert-file" cred-cert))))
+	     (starttls-extra-arguments
+	      (append
+	       starttls-extra-arguments
+	       (when (and (stringp cred-key) (stringp cred-cert)
+			  (file-regular-p
+			   (setq cred-key (expand-file-name cred-key)))
+			  (file-regular-p
+			   (setq cred-cert (expand-file-name cred-cert))))
+		 (list "--x509keyfile" cred-key "--x509certfile" cred-cert)))))
+	(starttls-open-stream "SMTP" process-buffer host port)))))
+
+(defun smtpmail-try-auth-methods (process supported-extensions host port)
+  (let* ((mechs (cdr-safe (assoc 'auth supported-extensions)))
+	 (mech (car (smtpmail-intersection smtpmail-auth-supported mechs)))
+	 (cred (if (stringp smtpmail-auth-credentials)
+		   (let* ((netrc (netrc-parse smtpmail-auth-credentials))
+                          (port-name (format "%s" (or port "smtp")))
+			  (hostentry (netrc-machine netrc host port-name
+                                                    port-name)))
+                     (when hostentry
+                       (list host port
+                             (netrc-get hostentry "login")
+                             (netrc-get hostentry "password"))))
+		 (smtpmail-find-credentials
+		  smtpmail-auth-credentials host port)))
+	 (passwd (when cred
+		   (or (smtpmail-cred-passwd cred)
+		       (read-passwd
+			(format "SMTP password for %s:%s: "
+				(smtpmail-cred-server cred)
+				(smtpmail-cred-port cred))))))
+	 ret)
+    (when (and cred mech)
+      (cond
+       ((eq mech 'cram-md5)
+	(smtpmail-send-command process (upcase (format "AUTH %s" mech)))
+	(if (or (null (car (setq ret (smtpmail-read-response process))))
+		(not (integerp (car ret)))
+		(>= (car ret) 400))
+	    (throw 'done nil))
+	(when (eq (car ret) 334)
+	  (let* ((challenge (substring (cadr ret) 4))
+		 (decoded (base64-decode-string challenge))
+		 (hash (rfc2104-hash 'md5 64 16 passwd decoded))
+		 (response (concat (smtpmail-cred-user cred) " " hash))
+		 ;; Osamu Yamane <[e-mail]>:
+		 ;; SMTP auth fails because the SMTP server identifies
+		 ;; only the first part of the string (delimited by
+		 ;; new line characters) as a response from the
+		 ;; client, and the rest as distinct commands.
+
+		 ;; In my case, the response string is 80 characters
+		 ;; long.  Without the no-line-break option for
+		 ;; base64-encode-sting, only the first 76 characters
+		 ;; are taken as a response to the server, and the
+		 ;; authentication fails.
+		 (encoded (base64-encode-string response t)))
+	    (smtpmail-send-command process (format "%s" encoded))
+	    (if (or (null (car (setq ret (smtpmail-read-response process))))
+		    (not (integerp (car ret)))
+		    (>= (car ret) 400))
+		(throw 'done nil)))))
+       ((eq mech 'login)
+	(smtpmail-send-command process "AUTH LOGIN")
+	(if (or (null (car (setq ret (smtpmail-read-response process))))
+		(not (integerp (car ret)))
+		(>= (car ret) 400))
+	    (throw 'done nil))
+	(smtpmail-send-command
+	 process (base64-encode-string (smtpmail-cred-user cred) t))
+	(if (or (null (car (setq ret (smtpmail-read-response process))))
+		(not (integerp (car ret)))
+		(>= (car ret) 400))
+	    (throw 'done nil))
+	(smtpmail-send-command process (base64-encode-string passwd t))
+	(if (or (null (car (setq ret (smtpmail-read-response process))))
+		(not (integerp (car ret)))
+		(>= (car ret) 400))
+	    (throw 'done nil)))
+       ((eq mech 'plain)
+	;; We used to send an empty initial request, and wait for an
+	;; empty response, and then send the password, but this
+	;; violate a SHOULD in RFC 2222 paragraph 5.1.  Note that this
+	;; is not sent if the server did not advertise AUTH PLAIN in
+	;; the EHLO response.  See RFC 2554 for more info.
+	(smtpmail-send-command process
+			       (concat "AUTH PLAIN "
+				       (base64-encode-string
+					(concat "\0"
+						(smtpmail-cred-user cred)
+						"\0"
+						passwd) t)))
+	(if (or (null (car (setq ret (smtpmail-read-response process))))
+		(not (integerp (car ret)))
+		(not (equal (car ret) 235)))
+	    (throw 'done nil)))
+
+       (t
+	(error "Mechanism %s not implemented" mech)))
+      ;; Remember the password.
+      (when (and (not (stringp smtpmail-auth-credentials))
+		 (null (smtpmail-cred-passwd cred)))
+	(setcar (cdr (cdr (cdr cred))) passwd)))))
+
+(defun smtpmail-via-smtp (recipient smtpmail-text-buffer)
+  (let ((process nil)
+	(host (or smtpmail-smtp-server
+		  (error "`smtpmail-smtp-server' not defined")))
+	(port smtpmail-smtp-service)
+        ;; smtpmail-mail-address should be set to the appropriate
+        ;; buffer-local value by the caller, but in case not:
+        (envelope-from (or smtpmail-mail-address
+                           (and mail-specify-envelope-from
+                                (mail-envelope-from))
+                           user-mail-address))
+	response-code
+	greeting
+	process-buffer
+	(supported-extensions '()))
+    (unwind-protect
+	(catch 'done
+	  ;; get or create the trace buffer
+	  (setq process-buffer
+		(get-buffer-create (format "*trace of SMTP session to %s*" host)))
+
+	  ;; clear the trace buffer of old output
+	  (with-current-buffer process-buffer
+	    (setq buffer-undo-list t)
+	    (erase-buffer))
+
+	  ;; open the connection to the server
+	  (setq process (smtpmail-open-stream process-buffer host port))
+	  (and (null process) (throw 'done nil))
+
+	  ;; set the send-filter
+	  (set-process-filter process 'smtpmail-process-filter)
+
+	  (with-current-buffer process-buffer
+	    (set-buffer-process-coding-system 'raw-text-unix 'raw-text-unix)
+	    (make-local-variable 'smtpmail-read-point)
+	    (setq smtpmail-read-point (point-min))
+
+
+	    (if (or (null (car (setq greeting (smtpmail-read-response process))))
+		    (not (integerp (car greeting)))
+		    (>= (car greeting) 400))
+		(throw 'done nil)
+	      )
+
+	    (let ((do-ehlo t)
+		  (do-starttls t))
+	      (while do-ehlo
+	    ;; EHLO
+	    (smtpmail-send-command process (format "EHLO %s" (smtpmail-fqdn)))
+
+	    (if (or (null (car (setq response-code
+				     (smtpmail-read-response process))))
+		    (not (integerp (car response-code)))
+		    (>= (car response-code) 400))
+		(progn
+		  ;; HELO
+		  (smtpmail-send-command
+		   process (format "HELO %s" (smtpmail-fqdn)))
+
+		  (if (or (null (car (setq response-code
+					   (smtpmail-read-response process))))
+			  (not (integerp (car response-code)))
+			  (>= (car response-code) 400))
+		      (throw 'done nil)))
+	      (dolist (line (cdr (cdr response-code)))
+		(let ((name
+		       (with-case-table ascii-case-table
+			 (mapcar (lambda (s) (intern (downcase s)))
+				 (split-string (substring line 4) "[ ]")))))
+		  (and (eq (length name) 1)
+		       (setq name (car name)))
+		  (and name
+		       (cond ((memq (if (consp name) (car name) name)
+				    '(verb xvrb 8bitmime onex xone
+					   expn size dsn etrn
+					   enhancedstatuscodes
+					   help xusr
+					   auth=login auth starttls))
+			      (setq supported-extensions
+				    (cons name supported-extensions)))
+			     (smtpmail-warn-about-unknown-extensions
+			      (message "Unknown extension %s" name)))))))
+
+	    (if (and do-starttls
+		     (smtpmail-find-credentials smtpmail-starttls-credentials host port)
+		     (member 'starttls supported-extensions)
+		     (numberp (process-id process)))
+		(progn
+		  (smtpmail-send-command process (format "STARTTLS"))
+		  (if (or (null (car (setq response-code (smtpmail-read-response process))))
+			  (not (integerp (car response-code)))
+			  (>= (car response-code) 400))
+		      (throw 'done nil))
+		  (starttls-negotiate process)
+		  (setq do-starttls nil))
+	      (setq do-ehlo nil))))
+
+	    (smtpmail-try-auth-methods process supported-extensions host port)
+
+	    (if (or (member 'onex supported-extensions)
+		    (member 'xone supported-extensions))
+		(progn
+		  (smtpmail-send-command process (format "ONEX"))
+		  (if (or (null (car (setq response-code (smtpmail-read-response process))))
+			  (not (integerp (car response-code)))
+			  (>= (car response-code) 400))
+		      (throw 'done nil))))
+
+	    (if (and smtpmail-debug-verb
+		     (or (member 'verb supported-extensions)
+			 (member 'xvrb supported-extensions)))
+		(progn
+		  (smtpmail-send-command process (format "VERB"))
+		  (if (or (null (car (setq response-code (smtpmail-read-response process))))
+			  (not (integerp (car response-code)))
+			  (>= (car response-code) 400))
+		      (throw 'done nil))))
+
+	    (if (member 'xusr supported-extensions)
+		(progn
+		  (smtpmail-send-command process (format "XUSR"))
+		  (if (or (null (car (setq response-code (smtpmail-read-response process))))
+			  (not (integerp (car response-code)))
+			  (>= (car response-code) 400))
+		      (throw 'done nil))))
+
+	    ;; MAIL FROM:<sender>
+	    (let ((size-part
+		   (if (or (member 'size supported-extensions)
+			   (assoc 'size supported-extensions))
+		       (format " SIZE=%d"
+			       (with-current-buffer smtpmail-text-buffer
+				 ;; size estimate:
+				 (+ (- (point-max) (point-min))
+				    ;; Add one byte for each change-of-line
+				    ;; because of CR-LF representation:
+				    (count-lines (point-min) (point-max)))))
+		     ""))
+		  (body-part
+		   (if (member '8bitmime supported-extensions)
+		       ;; FIXME:
+		       ;; Code should be added here that transforms
+		       ;; the contents of the message buffer into
+		       ;; something the receiving SMTP can handle.
+		       ;; For a receiver that supports 8BITMIME, this
+		       ;; may mean converting BINARY to BASE64, or
+		       ;; adding Content-Transfer-Encoding and the
+		       ;; other MIME headers.  The code should also
+		       ;; return an indication of what encoding the
+		       ;; message buffer is now, i.e. ASCII or
+		       ;; 8BITMIME.
+		       (if nil
+			   " BODY=8BITMIME"
+			 "")
+		     "")))
+;	      (smtpmail-send-command process (format "MAIL FROM:%s@%s" (user-login-name) (smtpmail-fqdn)))
+	      (smtpmail-send-command process (format "MAIL FROM:<%s>%s%s"
+                                                     envelope-from
+						     size-part
+						     body-part))
+
+	      (if (or (null (car (setq response-code (smtpmail-read-response process))))
+		      (not (integerp (car response-code)))
+		      (>= (car response-code) 400))
+		  (throw 'done nil)
+		))
+
+	    ;; RCPT TO:<recipient>
+	    (let ((n 0))
+	      (while (not (null (nth n recipient)))
+		(smtpmail-send-command process (format "RCPT TO:<%s>" (smtpmail-maybe-append-domain (nth n recipient))))
+		(setq n (1+ n))
+
+		(setq response-code (smtpmail-read-response process))
+		(if (or (null (car response-code))
+			(not (integerp (car response-code)))
+			(>= (car response-code) 400))
+		    (throw 'done nil)
+		  )
+		))
+
+	    ;; DATA
+	    (smtpmail-send-command process "DATA")
+
+	    (if (or (null (car (setq response-code (smtpmail-read-response process))))
+		    (not (integerp (car response-code)))
+		    (>= (car response-code) 400))
+		(throw 'done nil)
+	      )
+
+	    ;; Mail contents
+	    (smtpmail-send-data process smtpmail-text-buffer)
+
+	    ;;DATA end "."
+	    (smtpmail-send-command process ".")
+
+	    (if (or (null (car (setq response-code (smtpmail-read-response process))))
+		    (not (integerp (car response-code)))
+		    (>= (car response-code) 400))
+		(throw 'done nil)
+	      )
+
+	    ;;QUIT
+;	    (smtpmail-send-command process "QUIT")
+;	    (and (null (car (smtpmail-read-response process)))
+;		 (throw 'done nil))
+	    t ))
+      (if process
+	  (with-current-buffer (process-buffer process)
+	    (smtpmail-send-command process "QUIT")
+	    (smtpmail-read-response process)
+
+;	    (if (or (null (car (setq response-code (smtpmail-read-response process))))
+;		    (not (integerp (car response-code)))
+;		    (>= (car response-code) 400))
+;		(throw 'done nil)
+;	      )
+	    (delete-process process)
+	    (unless smtpmail-debug-info
+	      (kill-buffer process-buffer)))))))
+
+
+(defun smtpmail-process-filter (process output)
+  (with-current-buffer (process-buffer process)
+    (goto-char (point-max))
+    (insert output)))
+
+(defun smtpmail-read-response (process)
+  (let ((case-fold-search nil)
+	(response-strings nil)
+	(response-continue t)
+	(return-value '(nil ()))
+	match-end)
+    (catch 'done
+      (while response-continue
+	(goto-char smtpmail-read-point)
+	(while (not (search-forward "\r\n" nil t))
+	  (unless (memq (process-status process) '(open run))
+	    (throw 'done nil))
+	  (accept-process-output process)
+	  (goto-char smtpmail-read-point))
+
+	(setq match-end (point))
+	(setq response-strings
+	      (cons (buffer-substring smtpmail-read-point (- match-end 2))
+		    response-strings))
+
+	(goto-char smtpmail-read-point)
+	(if (looking-at "[0-9]+ ")
+	    (let ((begin (match-beginning 0))
+		  (end (match-end 0)))
+	      (if smtpmail-debug-info
+		  (message "%s" (car response-strings)))
+
+	      (setq smtpmail-read-point match-end)
+
+	      ;; ignore lines that start with "0"
+	      (if (looking-at "0[0-9]+ ")
+		  nil
+		(setq response-continue nil)
+		(setq return-value
+		      (cons (string-to-number
+			     (buffer-substring begin end))
+			    (nreverse response-strings)))))
+
+	  (if (looking-at "[0-9]+-")
+	      (progn (if smtpmail-debug-info
+			 (message "%s" (car response-strings)))
+		     (setq smtpmail-read-point match-end)
+		     (setq response-continue t))
+	    (progn
+	      (setq smtpmail-read-point match-end)
+	      (setq response-continue nil)
+	      (setq return-value
+		    (cons nil (nreverse response-strings)))))))
+      (setq smtpmail-read-point match-end))
+    return-value))
+
+
+(defun smtpmail-send-command (process command)
+  (goto-char (point-max))
+  (if (= (aref command 0) ?P)
+      (insert "PASS <omitted>\r\n")
+    (insert command "\r\n"))
+  (setq smtpmail-read-point (point))
+  (process-send-string process command)
+  (process-send-string process "\r\n"))
+
+(defun smtpmail-send-data-1 (process data)
+  (goto-char (point-max))
+
+  (if (and (multibyte-string-p data)
+	   smtpmail-code-conv-from)
+      (setq data (string-as-multibyte
+		  (encode-coding-string data smtpmail-code-conv-from))))
+
+  (if smtpmail-debug-info
+      (insert data "\r\n"))
+
+  (setq smtpmail-read-point (point))
+  ;; Escape "." at start of a line
+  (if (eq (string-to-char data) ?.)
+      (process-send-string process "."))
+  (process-send-string process data)
+  (process-send-string process "\r\n")
+  )
+
+(defun smtpmail-send-data (process buffer)
+  (let ((data-continue t) sending-data)
+    (with-current-buffer buffer
+      (goto-char (point-min)))
+    (while data-continue
+      (with-current-buffer buffer
+        (setq sending-data (buffer-substring (point-at-bol) (point-at-eol)))
+	(end-of-line 2)
+        (setq data-continue (not (eobp))))
+      (smtpmail-send-data-1 process sending-data))))
+
+(defun smtpmail-deduce-address-list (smtpmail-text-buffer header-start header-end)
+  "Get address list suitable for smtp RCPT TO: <address>."
+  (unwind-protect
+      (with-current-buffer smtpmail-address-buffer
+	(erase-buffer)
+	(let
+	    ((case-fold-search t)
+	     (simple-address-list "")
+	     this-line
+	     this-line-end
+	     addr-regexp)
+	  (insert-buffer-substring smtpmail-text-buffer header-start header-end)
+	  (goto-char (point-min))
+	  ;; RESENT-* fields should stop processing of regular fields.
+	  (save-excursion
+	    (setq addr-regexp
+		  (if (re-search-forward "^Resent-\\(to\\|cc\\|bcc\\):"
+					 header-end t)
+		      "^Resent-\\(to\\|cc\\|bcc\\):"
+		    "^\\(To:\\|Cc:\\|Bcc:\\)")))
+
+	  (while (re-search-forward addr-regexp header-end t)
+	    (replace-match "")
+	    (setq this-line (match-beginning 0))
+	    (forward-line 1)
+	    ;; get any continuation lines
+	    (while (and (looking-at "^[ \t]+") (< (point) header-end))
+	      (forward-line 1))
+	    (setq this-line-end (point-marker))
+	    (setq simple-address-list
+		  (concat simple-address-list " "
+			  (mail-strip-quoted-names (buffer-substring this-line this-line-end))))
+	    )
+	  (erase-buffer)
+	  (insert " " simple-address-list "\n")
+	  (subst-char-in-region (point-min) (point-max) 10 ?  t);; newline --> blank
+	  (subst-char-in-region (point-min) (point-max) ?, ?  t);; comma   --> blank
+	  (subst-char-in-region (point-min) (point-max)  9 ?  t);; tab     --> blank
+
+	  (goto-char (point-min))
+	  ;; tidyness in case hook is not robust when it looks at this
+	  (while (re-search-forward "[ \t]+" header-end t) (replace-match " "))
+
+	  (goto-char (point-min))
+	  (let (recipient-address-list)
+	    (while (re-search-forward " \\([^ ]+\\) " (point-max) t)
+	      (backward-char 1)
+	      (setq recipient-address-list (cons (buffer-substring (match-beginning 1) (match-end 1))
+						 recipient-address-list))
+	      )
+	    (setq smtpmail-recipient-address-list recipient-address-list))
+
+	  )
+	)
+    )
+  )
+
+
+(defun smtpmail-do-bcc (header-end)
+  "Delete [Resent-]BCC: and their continuation lines from the header area.
+There may be multiple BCC: lines, and each may have arbitrarily
+many continuation lines."
+  (let ((case-fold-search t))
+    (save-excursion
+      (goto-char (point-min))
+      ;; iterate over all BCC: lines
+      (while (re-search-forward "^\\(RESENT-\\)?BCC:" header-end t)
+	(delete-region (match-beginning 0)
+		       (progn (forward-line 1) (point)))
+	;; get rid of any continuation lines
+	(while (and (looking-at "^[ \t].*\n") (< (point) header-end))
+	  (replace-match ""))))))
+
+
+(provide 'smtpmail)
+
+;;; arch-tag: a76992df-6d71-43b7-9e72-4bacc6c05466
+;;; smtpmail.el ends here
+----------------------------
+revision 1.450 (applied)
+date: 2008-02-12 07:13:29 +0000;  author: bastien1;  state: Exp;  lines: +9 -23;  commitid: kUIzo78FXw0mV4Rs;
+Reverted wrong changes to rmail.el.
+----------------------------
+revision 1.449 (irrelevant)
+date: 2008-02-12 07:10:49 +0000;  author: bastien1;  state: Exp;  lines: +23 -9;  commitid: U6bdsg13J3PmU4Rs;
[phone] Drew Adams  <[e-mail]>
+
+	* help.el (describe-key): Joined some split lines to facilitate
+	filling.
+	* help-fns.el (describe-function-1): Fill text of overlong lines.
+----------------------------
+revision 1.448 (patched)
+date: 2008-02-10 22:10:09 +0000;  author: bastien1;  state: Exp;  lines: +4 -2;  commitid: XXphXBYKRXGPWTQs;
+(rmail-nonignored-headers): Allow to be nil.
+(rmail-clear-headers): Don't check `rmail-nonignored-headers' when
+it is nil.
+----------------------------
+revision 1.447 (defer)
+date: 2008-02-01 16:01:27 +0000;  author: miles;  state: Exp;  lines: +11 -11;  commitid: A9tHDrKNUaDbcIPs;
+Merge unicode branch
+
+Revision: [e-mail]/emacs--devo--0--patch-1037
+----------------------------
+revision 1.446 (patched)
+date: 2008-02-01 02:40:23 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: XnTPkNPE8wPKLDPs;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-1032
+----------------------------
+revision 1.445 (defer)
+date: 2008-01-13 18:16:04 +0000;  author: m061211;  state: Exp;  lines: +75 -70;  commitid: 542CxzVsGawCyhNs;
+(rmail-convert-to-babyl-format): Remove
+save-excursion to avoid infinite looping.
+----------------------------
+revision 1.444 (patched)
+date: 2008-01-08 20:45:07 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: GLqjDoDkbCnkxEMs;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-987
+----------------------------
+revision 1.443 (patched)
+date: 2007-11-27 06:57:06 +0000;  author: dann;  state: Exp;  lines: +9 -0;  commitid: 2IinMqAAxCxbjbHs;
+* progmodes/cperl-mode.el (compilation-error-regexp-alist): Pacify
+byte compiler.
+(cperl-mode): Use with-no-warnings for setting vc-header-alist.
+
+* progmodes/idlwave.el (idlwave-shell-get-path-info)
+(idlwave-shell-temp-file, idlwave-shell-is-running)
+(widget-value, comint-dynamic-complete-filename, Info-goto-node):
+* progmodes/idlw-help.el (idlwave-prepare-structure-tag-completion)
+(idlwave-all-method-classes, idlwave-all-method-keyword-classes)
+(idlwave-beginning-of-statement, idlwave-best-rinfo-assoc)
+(idlwave-class-found-in, idlwave-class-or-superclass-with-tag)
+(idlwave-completing-read, idlwave-current-routine)
+(idlwave-downcase-safe, idlwave-entry-find-keyword)
+(idlwave-expand-keyword, idlwave-find-class-definition)
+(idlwave-find-inherited-class, idlwave-find-struct-tag)
+(idlwave-get-buffer-visiting, idlwave-in-quote)
+(idlwave-make-full-name, idlwave-members-only)
+(idlwave-popup-select, idlwave-routine-source-file)
+(idlwave-routines, idlwave-sintern-class)
+(idlwave-sintern-keyword, idlwave-sintern-method)
+(idlwave-sintern-routine-or-method)
+(idlwave-substitute-link-target, idlwave-sys-dir)
+(idlwave-this-word, idlwave-what-module-find-class)
+(idlwave-where):
+* progmodes/idlw-complete-structtag.el (idlwave-shell-buffer):
+* mail/uce.el (rmail-msg-is-pruned)
+(rmail-maybe-set-message-counters, rmail-msgbeg, rmail-msgend)
+(rmail-toggle-header):
+* mail/sendmail.el (dired-view-file, dired-get-filename):
+* mail/rmailkwd.el (rmail-maybe-set-message-counters)
+(rmail-display-labels, rmail-msgbeg)
+(rmail-set-message-deleted-p, rmail-message-labels-p)
+(rmail-show-message, mail-comma-list-regexp)
+(mail-parse-comma-list):
+* mail/rmail.el (rmail-spam-filter, rmail-summary-goto-msg)
+(rmail-summary-mark-undeleted, rmail-summary-mark-deleted)
+(rfc822-addresses, mail-abbrev-make-syntax-table)
+(mail-sendmail-delimit-header, mail-header-end):
+* mail/hashcash.el (message-narrow-to-headers-or-head)
+(message-fetch-field, message-goto-eoh)
+(message-narrow-to-headers):
+* vc.el (view-mode-exit): Declare as functions.
+
+* mail/vms-pmail.el:
+* vmsproc.el:
+* vms-patch.el: Don't byte compile these files, they don't work.
+
+* Makefile.in (SOME_MACHINE_LISP): Remove VMS files, they are not
+compiled anymore.
+----------------------------
+revision 1.442 (applied)
+date: 2007-11-25 16:48:31 +0000;  author: dann;  state: Exp;  lines: +4 -0;  commitid: AG5BA1V4T2VeEYGs;
+* mail/mspools.el (rmail-get-new-mail):
+* mail/reporter.el (mail-position-on-field, mail-text):
+* mail/rmail.el (mail-position-on-field, mail-text-start)
+(rmail-update-summary):
+* mail/rmailedit.el (rmail-summary-disable)
+(rmail-summary-enable):
+* mail/rmailmsc.el (rmail-parse-file-inboxes)
+(rmail-show-message):
+* mail/rmailout.el (rmail-update-summary):
+* mail/rmailsort.el (rmail-update-summary):
+* mail/sendmail.el (dired-move-to-filename, dired-get-filename)
+(dired-view-file):
+* mail/uce.el (mail-strip-quoted-names):
+* mail/undigest.el (rmail-update-summary):
+* mail/unrmail.el (mail-strip-quoted-names):
+* ediff.el (diff-latest-backup-file): Declare as functions.
+
+* obsolete/mlsupport.el (ml-previous-page): Fix typo.
+(kill-to-end-of-line):
+* obsolete/rnews.el (news-set-minor-modes): Remove non working
+functions.
+----------------------------
+revision 1.441 (applied)
+date: 2007-11-21 04:55:58 +0000;  author: miles;  state: Exp;  lines: +3 -1;  commitid: sh9id2ij5oqKPoGs;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-937
+----------------------------
+revision 1.440 (patched)
+date: 2007-10-12 03:05:02 +0000;  author: gm;  state: Exp;  lines: +3 -2;  commitid: KgZKUHr3QcvrvfBs;
+Re-fill copyright header.
+(rmail-list-to-menu): Use mapc rather than mapcar.
+----------------------------
+revision 1.439 (applied)
+date: 2007-08-22 03:36:42 +0000;  author: gm;  state: Exp;  lines: +7 -4;  commitid: snSlmOInawCWjHus;
+(rmail-movemail-variant-p): Call on load to set movemail related variables.
+(rmail-insert-inbox-text): Use only rmail-movemail-program, which
+will now be set before this is called.
+----------------------------
+revision 1.438 (applied)
+date: 2007-08-20 09:30:12 +0000;  author: schwab;  state: Exp;  lines: +1 -1;  commitid: we67G0c0GiHcltus;
+(rmail-autodetect): Doc fix.
+----------------------------
+revision 1.437 (patched)
+date: 2007-08-13 13:41:26 +0000;  author: miles;  state: Exp;  lines: +2 -2;  commitid: VsOBiVySwfx6XAts;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-851
+----------------------------
+revision 1.436 (irrelevant)
+date: 2007-07-26 05:27:13 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: IKTBbGNFxqtbNers;
+Merge from emacs--rel--22
+
+Patches applied:
+
+ * emacs--rel--22  (patch 70-73)
+
+   - Update from CVS
+
[phone]  Glenn Morris  <[e-mail]>
+
+   * Relicense all FSF files to GPLv3 or later.
+
+Revision: [e-mail]/emacs--devo--0--patch-828
+----------------------------
+revision 1.435 (applied)
+date: 2007-06-09 12:52:02 +0000;  author: ttn;  state: Exp;  lines: +1 -1;  commitid: qAfHMYDnHTNVLels;
+(rmail-movemail-variant-in-use): Fix doc typo.
+----------------------------
+revision 1.434 (defer)
+date: 2007-05-14 19:58:45 +0000;  author: eliz;  state: Exp;  lines: +7 -6;  commitid: Lc0wnr2BZzX0YVhs;
+(rmail-convert-to-babyl-format): Check content-transfer-encoding _last_,
+because it's its position that we need as value of base64-header-field-end.
+----------------------------
+revision 1.433 (defer)
+date: 2007-04-03 11:11:27 +0000;  author: eliz;  state: Exp;  lines: +17 -7;
+branches:  1.433.2;  1.433.4;
+(rmail-convert-to-babyl-format): Don't try to decode base-64 encoded body
+if its content-type is something other than text/* or message/*.
+----------------------------
+revision 1.432 (applied)
+date: 2007-02-24 17:12:34 +0000;  author: jpw;  state: Exp;  lines: +1 -1;
+(rmail-message-filter): Fix custom type.
+----------------------------
+revision 1.431 (irrelevant)
+date: 2007-01-21 02:59:07 +0000;  author: gm;  state: Exp;  lines: +1 -1;
+Add 2007 to copyright years.
+----------------------------
+revision 1.430 (defer)
+date: 2006-11-04 15:38:39 +0000;  author: eliz;  state: Exp;  lines: +29 -3;
+(rmail-redecode-body): New optional argument RAW.
+Don't encode body if RAW is non-nil, or if the old encoding is identical to the
+new encoding, or if the body contains only eight-bit-* characters.
+----------------------------
+revision 1.429 (applied)
+date: 2006-10-07 13:29:51 +0000;  author: eliz;  state: Exp;  lines: +1 -1;
+(rmail-mime-charset-pattern): Allow a TAB between "Content-Type" and
+"text/plain".
+----------------------------
+revision 1.428 (defer)
+date: 2006-10-07 13:12:42 +0000;  author: eliz;  state: Exp;  lines: +6 -0;
+(rmail-redecode-body): If the old encoding is `undecided', call
+find-coding-systems-region to find a proper non-trivial encoding.
+----------------------------
+revision 1.427 (defer)
+date: 2006-09-08 12:02:13 +0000;  author: rms;  state: Exp;  lines: +11 -6;
+(rmail-get-new-mail): Say whether all msgs are spam.
+(rmail-convert-to-babyl-format): Don't record undo, leave list empty.
+----------------------------
+revision 1.426 (defer)
+date: 2006-05-20 17:36:07 +0000;  author: eliz;  state: Exp;  lines: +3 -3;
+(rmail-mime-charset-pattern): Add "?:" before "format".
+(rmail-convert-to-babyl-format): Undo the change from 2006-04-19.
+----------------------------
+revision 1.425 (defer)
+date: 2006-04-19 09:55:40 +0000;  author: rfrancoise;  state: Exp;  lines: +2 -2;
+(rmail-convert-to-babyl-format): Use second group from
+`rmail-mime-charset-pattern'.
+----------------------------
+revision 1.424 (applied)
+date: 2006-04-10 03:19:03 +0000;  author: rms;  state: Exp;  lines: +3 -1;
+(rmail-mime-charset-pattern): Ignore format and delsp specs
+while looking for charset.
+----------------------------
+revision 1.423 (patched)
+date: 2006-03-25 11:33:48 +0000;  author: eliz;  state: Exp;  lines: +34 -0;
+(tool-bar-map): Defvar it.
+(rmail-tool-bar-map): Tool-bar buttons for Rmail.
+(rmail-perm-variables): Make rmail-tool-bar-map a local variable.
+----------------------------
+revision 1.422 (patched)
+date: 2006-03-18 18:28:36 +0000;  author: rms;  state: Exp;  lines: +4 -4;
+(rmail-reply-regexp): Undo previous change.
+----------------------------
+revision 1.421 (applied)
+date: 2006-03-11 15:13:47 +0000;  author: rms;  state: Exp;  lines: +8 -2;
+(rmail-ignored-headers): Discard DomainKey-Signature.
+----------------------------
+revision 1.420 (irrelevant)
+date: 2006-02-06 12:31:40 +0000;  author: ttn;  state: Exp;  lines: +1 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.419 (patched)
+date: 2006-01-19 11:59:15 +0000;  author: handa;  state: Exp;  lines: +17 -4;
+(rmail-enable-mime): Docstring fixed.
+(rmail-mime-feature): Likewise.
+(rmail-require-mime-maybe): Use display-warning to show a warning
+message.
+----------------------------
+revision 1.418 (irrelevant)
+date: 2006-01-08 23:47:07 +0000;  author: as;  state: Exp;  lines: +4 -2;
+(rmail-reply-regexp): Also ignore mailing list
+identifiers sometimes added in square brackets at the beginning of
+subject lines.
+----------------------------
+revision 1.417 (applied)
+date: 2006-01-08 15:18:55 +0000;  author: as;  state: Exp;  lines: +35 -13;
+(rmail-current-subject): New function.
+(rmail-current-subject-regexp): New function.
+(rmail-next-same-subject): Use it.
+----------------------------
+revision 1.416 (applied)
+date: 2005-12-10 11:29:53 +0000;  author: eliz;  state: Exp;  lines: +9 -4;
+(rmail-next-same-subject): Handle multiple "Re: " strings and long subject
+lines that were broken into multiple lines at arbitrary places.
+----------------------------
+revision 1.415 (applied)
+date: 2005-09-24 13:43:59 +0000;  author: rfrancoise;  state: Exp;  lines: +14 -12;
[phone]  Emilio C. Lopes  <[e-mail]>
+
+	* woman.el (woman-file-name):
+	* wid-edit.el (widget-file-prompt-value)
+	(widget-coding-system-prompt-value):
+	* w32-fns.el (set-w32-system-coding-system):
+	* vc.el (vc-version-diff, vc-annotate):
+	* textmodes/reftex-auc.el (reftex-arg-cite)
+	(reftex-arg-index-tag):
+	* textmodes/refer.el (refer-get-bib-files):
+	* textmodes/artist.el (artist-figlet-choose-font):
+	* terminal.el (terminal-emulator):
+	* replace.el (occur-read-primary-args):
+	* rect.el (string-rectangle, string-insert-rectangle):
+	* ps-print.el (ps-print-preprint):
+	* progmodes/pascal.el (pascal-goto-defun):
+	* progmodes/etags.el (visit-tags-table, visit-tags-table-buffer):
+	* progmodes/compile.el (compilation-find-file):
+	* printing.el (pr-interactive-n-up):
+	* play/animate.el (animate-birthday-present):
+	* net/rcompile.el (remote-compile):
+	* man.el (man, Man-goto-section, Man-follow-manual-reference):
+	* mail/rmailsum.el (rmail-summary-search-backward)
+	(rmail-summary-search):
+	* mail/rmailout.el (rmail-output-read-rmail-file-name)
+	(rmail-output-read-file-name):
+	* mail/rmail.el (rmail-search, rmail-search-backwards):
+	* mail/mailabbrev.el (merge-mail-abbrevs, rebuild-mail-abbrevs):
+	* locate.el (locate):
+	* international/quail.el (quail-show-keyboard-layout):
+	* international/mule.el (set-buffer-file-coding-system)
+	(revert-buffer-with-coding-system, set-file-name-coding-system)
+	(set-terminal-coding-system, set-keyboard-coding-system)
+	(set-next-selection-coding-system):
+	* international/mule-diag.el (describe-coding-system)
+	(describe-font, describe-fontset):
+	* international/mule-cmds.el (universal-coding-system-argument)
+	(search-unencodable-char, describe-input-method)
+	(set-language-environment, describe-language-environment):
+	* international/codepage.el (codepage-setup):
+	* international/code-pages.el (codepage-setup):
+	* info.el (Info-search, Info-follow-reference)
+	(Info-search-backward):
+	* emacs-lisp/advice.el (ad-read-advised-function)
+	(ad-read-advice-class, ad-clear-cache, ad-activate)
+	(ad-deactivate, ad-update, ad-unadvise, ad-read-advice-name)
+	(ad-enable-advice, ad-disable-advice, ad-remove-advice)
+	(ad-read-regexp):
+	* ediff-util.el (ediff-toggle-regexp-match):
+	* ediff-ptch.el (ediff-prompt-for-patch-file):
+	* dired-aux.el (dired-diff):
+	* diff.el (diff):
+	* cus-edit.el (custom-variable-prompt):
+	* calendar/timeclock.el (timeclock-ask-for-project):
+	* calc/calcalg3.el (calc-get-fit-variables):
+	* calc/calc-store.el (calc-edit-variable)
+	(calc-permanent-variable):
+	* vc-mcvs.el (vc-mcvs-register):
+	* shadowfile.el (shadow-define-literal-group):
+	* woman.el (woman-file-name):
+	* vc.el (vc-version-diff, vc-merge):
+	* textmodes/reftex-index.el (reftex-index-complete-tag):
+	* format.el (format-decode-buffer, format-decode-region):
+	* emulation/viper-cmd.el (viper-read-string-with-history):
+	* emacs-lisp/debug.el (cancel-debug-on-entry):
+	* emacs-lisp/checkdoc.el (checkdoc-this-string-valid-engine):
+	* ediff.el (ediff-merge-revisions)
+	(ediff-merge-revisions-with-ancestor, ediff-revision):
+	* completion.el (interactive-completion-string-reader):
+	* calc/calc-prog.el (calc-user-define-formula):
+	Follow convention for reading with the minibuffer.
+----------------------------
+revision 1.414 (applied)
+date: 2005-08-29 14:38:57 +0000;  author: lektu;  state: Exp;  lines: +10 -0;
+(deleted-head, font-lock-fontified, mail-abbrev-syntax-table, mail-abbrevs,
+messages-head, rmail-use-spam-filter, rsf-beep, rsf-sleep-after-message,
+total-messages): Add defvars.
+----------------------------
+revision 1.413 (defer 'rmail-reply)
+date: 2005-08-15 02:04:29 +0000;  author: rms;  state: Exp;  lines: +43 -26;
+(rmail-nonignored-headers): New variable.
+(rmail-clear-headers): Use it.
+(rmail-reply): Better handling of mail-followup-to header.
+----------------------------
+revision 1.412 (applied)
+date: 2005-08-14 23:44:12 +0000;  author: schwab;  state: Exp;  lines: +2 -3;
+Revert last change.
+----------------------------
+revision 1.411 (irrelevant)
+date: 2005-08-14 22:50:04 +0000;  author: ttn;  state: Exp;  lines: +3 -2;
+Fix dependency bug: Wrap `desktop-buffer-mode-handlers'
+modification in `eval-after-load' form.
+----------------------------
+revision 1.410 (applied)
+date: 2005-08-12 10:26:59 +0000;  author: eliz;  state: Exp;  lines: +16 -2;
+(rmail-end-of-message): New command to go to the
+end of the current message.  Added to `rmail-mode-map' with key "/".
+(rmail-beginning-of-message): Fixed to work as documented.
+(rmail-mode): Change documentation.
+----------------------------
+revision 1.409 (applied)
+date: 2005-08-10 19:40:05 +0000;  author: lh;  state: Exp;  lines: +3 -1;
+Add handler to desktop-buffer-mode-handlers.
+(rmail-restore-desktop-buffer): Remove autoload cookie.
+----------------------------
+revision 1.408 (patched)
+date: 2005-08-09 11:38:10 +0000;  author: rms;  state: Exp;  lines: +2 -2;
+(rmail-ignored-headers): Don't hide mime-version: and content-type: headers.
+----------------------------
+revision 1.407 (applied)
+date: 2005-08-06 18:54:05 +0000;  author: ttn;  state: Exp;  lines: +8 -8;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.406 (applied)
+date: 2005-07-08 22:31:32 +0000;  author: rms;  state: Exp;  lines: +4 -4;
+(rmail-only-expunge): Fix paren error.
+Unconditionally try to leave point at the same old place.
+----------------------------
+revision 1.405 (irrelevant)
+date: 2005-07-04 17:46:22 +0000;  author: lute;  state: Exp;  lines: +2 -2;
+Update FSF's address.
+----------------------------
+revision 1.404 (applied)
+date: 2005-05-26 15:16:48 +0000;  author: lute;  state: Exp;  lines: +1 -1;
+(rmail-mode): Use run-mode-hooks.
+----------------------------
+revision 1.403 (patched) 
+date: 2005-05-21 14:13:00 +0000;  author: eliz;  state: Exp;  lines: +5 -1;
+(rmail-reply): Filter the list in reply-to through rmail-dont-reply-to.
+----------------------------
+revision 1.402 (irrelevant)
+date: 2005-05-16 11:16:34 +0000;  author: lektu;  state: Exp;  lines: +1 -1;
+Replace `string-to-int' by `string-to-number'.
+----------------------------
+revision 1.401 (applied)
+date: 2005-04-24 21:32:28 +0000;  author: rms;  state: Exp;  lines: +4 -5;
+(rmail-font-lock-keywords): Match any number of
+citation markers at start of each line.
+----------------------------
+revision 1.400 (irrelevant)
+date: 2005-04-23 16:36:53 +0000;  author: rms;  state: Exp;  lines: +3 -1;
+(rmail-font-lock-keywords): Use font-lock-comment-delimiter-face.
+----------------------------
+revision 1.399 (applied)
+date: 2005-04-17 15:55:50 +0000;  author: rms;  state: Exp;  lines: +8 -5;
+(rmail-ignored-headers): Ignore more headers
+(rmail-font-lock-keywords): Don't fontify the text of a citation.
+----------------------------
+revision 1.398 (applied)
+date: 2005-04-02 11:31:06 +0000;  author: eliz;  state: Exp;  lines: +20 -29;
+(rmail-parse-url): Bugfix. Parse traditional mailbox specifications
+as well as URLs.
+(rmail-insert-inbox-text): Remove unused conditional branches.
+----------------------------
+revision 1.397 (applied)
+date: 2005-03-18 00:12:08 +0000;  author: rms;  state: Exp;  lines: +56 -15;
+branches:  1.397.2;
+(rmail-movemail-program, rmail-pop-password)
+(rmail-pop-password-required, rmail-remote-password): Doc fixes.
+(rmail-preserve-inbox, rmail-probe, rmail-autodetect): Doc fix.
+
+(rmail-unknown-mail-followup-to): New function.
+(rmail-show-message): Use rmail-unknown-mail-followup-to.
+(rmail-reply): Recognize Mail-Followup-To and Mail-Reply-To headers.
+----------------------------
+revision 1.396 (applied)
+date: 2005-02-09 15:50:37 +0000;  author: kfstorm;  state: Exp;  lines: +10 -10;
+Change release version from 21.4 to 22.1 throughout.
+Change development version from 21.3.50 to 22.0.50.
+----------------------------
+revision 1.395 (applied)
+date: 2005-01-15 14:27:41 +0000;  author: eliz;  state: Exp;  lines: +223 -82;
+Updated to work with movemail from GNU Mailutils
+(rmail-pop-password, rmail-pop-password-required): Moved to
+rmail-obsolete group.
+(rmail-set-pop-password): Renamed to rmail-set-remote-password.
+All callers updated.
+(rmail-get-pop-password): Renamed to rmail-get-remote-password.
+Take an argument specifying whether it is POP or IMAP mailbox we
+are using. All callers updated.
+(rmail-pop-password-error): Renamed to rmail-remote-password-error.
+Added mailutils-specific error message.
+(rmail-movemail-search-path)
+(rmail-movemail-variant-in-use): New variables.
+(rmail-remote-password, rmail-remote-password-required): New
+customization variables.
+(rmail-probe,rmail-autodetect, rmail-movemail-variant-p): New functions
+(rmail-parse-url): New function.
+(rmail-get-new-mail, rmail-insert-inbox-text): Updated for use
+with GNU mailutils movemail.
+----------------------------
+revision 1.394 (applied)
+date: 2004-12-27 16:11:33 +0000;  author: rms;  state: Exp;  lines: +2 -0;
+(rmail-resend): Let MAIL-ALIAS-FILE arg override mail-personal-alias-file.
+----------------------------
+revision 1.393 (defer, part of spam filter)
+date: 2004-11-12 17:08:57 +0000;  author: eliz;  state: Exp;  lines: +2 -2;
+(rmail-get-new-mail): Use the renamed variables `rsf-beep' and
+`rsf-sleep-after-message'.
+----------------------------
+revision 1.392 (irrelevant)
+date: 2004-07-24 21:35:32 +0000;  author: rms;  state: Exp;  lines: +1 -1;
+(rmail-mime-charset-pattern): Don't include semicolon in the charset value.
+----------------------------
+revision 1.391 (applied)
+date: 2004-04-26 18:54:23 +0000;  author: lh;  state: Exp;  lines: +3 -1;
+branches:  1.391.2;
+(rmail-variables): Bind desktop-save-buffer to t.
+----------------------------
+revision 1.390 (defer)
+date: 2004-04-24 08:57:31 +0000;  author: eliz;  state: Exp;  lines: +13 -9;
+(rmail-mail-new-frame): Doc fix.
+(rmail-start-mail): Support rmail-mail-new-frame even on
+terminals that can display only one frame at a time.
+----------------------------
+revision 1.389 (applied)
+date: 2004-04-21 20:49:37 +0000;  author: lh;  state: Exp;  lines: +24 -9;
+(rmail-restore-desktop-buffer): Move from desktop.el. Add Parameters.
+----------------------------
+revision 1.388 (irrelevant)
+date: 2004-04-19 18:04:46 +0000;  author: eliz;  state: Exp;  lines: +9 -7;
+(rmail-convert-to-babyl-format): Don't remove ^M
+characters left after base64 decoding.
+(rmail-decode-region): Use -dos variety of `coding', to remove any
+^M characters left after qp or base64 decoding.
+----------------------------
+revision 1.387 (irrelevant)
+date: 2004-03-07 20:04:51 +0000;  author: eliz;  state: Exp;  lines: +0 -1;
+Remove redundant whitespace.
+----------------------------
+revision 1.386 (defer)
+date: 2004-03-04 17:03:51 +0000;  author: rms;  state: Exp;  lines: +6 -3;
+(rmail-convert-to-babyl-format):
+Specify t for UNIBYTE when calling mail-unquote-printable-region.
+----------------------------
+revision 1.385 (defer)
+date: 2004-02-17 19:54:49 +0000;  author: uid65627;  state: Exp;  lines: +8 -3;
+(rmail-get-new-mail): Don't reference
+rmail-use-spam-filter if rmail-spam-filter is not loaded.
+----------------------------
+revision 1.384 (applied)
+date: 2004-02-16 11:35:50 +0000;  author: uid65627;  state: Exp;  lines: +3 -3;
+(rmail-default-dont-reply-to-names): Make "info-"
+anchored at the beginning of the email address.
+----------------------------
+revision 1.383 (irrelevant)
+date: 2004-02-08 22:36:05 +0000;  author: uid65629;  state: Exp;  lines: +2 -2;
+(rmail-get-new-mail): Remove useless use of
+format.
+----------------------------
+revision 1.382 (irrelevant)
+date: 2004-02-08 22:33:42 +0000;  author: uid65629;  state: Exp;  lines: +3 -5;
+(rmail-get-new-mail): Remove extra format string
+arguments.
+----------------------------
+revision 1.381 (defer)
+date: 2004-01-21 12:35:55 +0000;  author: uid66361;  state: Exp;  lines: +8 -1;
+(rmail-convert-to-babyl-format): Avoid deleting trailing white space
+and ensure a final newline.
+----------------------------
+revision 1.380 (partial, along with 1.406)
+date: 2004-01-16 18:23:37 +0000;  author: uid65566;  state: Exp;  lines: +59 -9;
+(rmail-get-new-mail): New local rsf-number-of-spam.
+Call rmail-spam-filter.  Delete and expunge spam.
+Print number of spam messages deleted.
+Save and restore the deletion status of old messages when reading
+new mail with spam filter, so that expunging spam does not expunge
+msgs deleted by the user.
+
+(rmail-only-expunge): added an optional argument dont-show to
+prevent showing message after expunge.
+----------------------------
+revision 1.379 (defer)
+date: 2004-01-12 21:56:50 +0000;  author: uid65566;  state: Exp;  lines: +7 -41;
+(rmail-convert-to-babyl-format): Use mail-unquote-printable-region.
+(rmail-hex-string-to-integer, rmail-decode-quoted-printable):
+(rmail-hex-char-to-integer): Functions deleted.
+----------------------------
+revision 1.378 (defer)
+date: 2003-12-30 11:42:37 +0000;  author: uid65627;  state: Exp;  lines: +4 -1;
+(rmail-convert-to-babyl-format): Fix off-by-one
+error in arguments to base64-decode-region.  Remove ^M characters
+after decoding base64.
+----------------------------
+revision 1.377 (defer)
+date: 2003-12-30 10:45:41 +0000;  author: uid65627;  state: Exp;  lines: +28 -22;
+(rmail-convert-to-babyl-format): Make the code
+cleaner (suggested by Richard Stallman).
+----------------------------
+revision 1.376 (irrelevant)
+date: 2003-11-03 19:20:23 +0000;  author: eliz;  state: Exp;  lines: +22 -18;
+(rmail-convert-to-babyl-format): If
+base64-decode-region signals an error, catch it and silently
+ignore it.
+----------------------------
+revision 1.375 (defer)
+date: 2003-10-16 16:54:48 +0000;  author: eliz;  state: Exp;  lines: +3 -3;
+(rmail-convert-to-babyl-format): Fix the last change.
+----------------------------
+revision 1.374 (defer)
+date: 2003-10-16 16:49:27 +0000;  author: eliz;  state: Exp;  lines: +9 -3;
+(rmail-convert-to-babyl-format): Display a message while converting to Babyl.
+----------------------------
+revision 1.373 (applied)
+date: 2003-09-01 15:45:30 +0000;  author: miles;  state: Exp;  lines: +1 -0;
+Add arch taglines
+----------------------------
+revision 1.372 (defer)
+date: 2003-08-28 15:11:15 +0000;  author: eliz;  state: Exp;  lines: +73 -6;
+(rmail-convert-to-babyl-format): Detect
+quoted-printable- and base64-encoded messages and decode them
+automatically.  Set the message's encoding from the charset=
+header, if any.  Decode base64-encoded messages in Mail format as
+well.
+----------------------------
+revision 1.371 (merged)
+date: 2003-05-15 00:01:00 +0000;  author: jpw;  state: Exp;  lines: +1 -1;
+branches:  1.371.4;
+(rmail-ignored-headers): Ignore Face: header.
+----------------------------
+revision 1.370 (applied)
+date: 2003-05-06 17:47:18 +0000;  author: lektu;  state: Exp;  lines: +1 -1;
+(rmail-primary-inbox-list): Don't quote nil and t in docstrings.
+----------------------------
+revision 1.369 (irrelevant)
+date: 2003-02-20 21:07:29 +0000;  author: lektu;  state: Exp;  lines: +1 -1;
+(rmail-insert-inbox-text): Make the pop3 mechanism work on cygwin systems too.
+----------------------------
+revision 1.368 (base)
+date: 2003-01-06 16:02:29 +0000;  author: jpw;  state: Exp;  lines: +3 -3;
+branches:  1.368.2;
+(rmail-mmdf-delim1, rmail-mmdf-delim2): Doc fixes.
+
+Keys:
+applied: The patch has already been applied.
+irrelevant: The change is no longer relevant.
+defer: think about this change immediately after mbox/trunk is basically running.
+merged: The change has been applied now.
+partial: Some of the patch is now applied but some is deferred.
+
+Todo:
+determine if any changes to (rmail-convert-to-babyl) need to be applied in some new fashion.
+revisit spam handling additions.

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/mail/mbox-changes/rmailedit.el.changes	Mon Aug 18 05:18:52 2008 +0000
@@ -0,0 +1,206 @@
+RCS file: /cvsroot/emacs/emacs/lisp/mail/rmailedit.el,v
+Working file: rmailedit.el
+head: 1.40
+branch:
+locks: strict
+access list:
+symbolic names:
+	remove-vms: 1.40
+	before-remove-vms: 1.40
+	remove-carbon: 1.40
+	before-remove-carbon: 1.40
+	before-merge-emacs-app-to-trunk: 1.40
+	font-backend: 1.38.0.2
+	font-backend-base: 1.38
+	EMACS_22_2: 1.34.2.2
+	EMACS_PRETEST_22_1_92: 1.34.2.2
+	lisp-bob: 1.37
+	EMACS_PRETEST_22_1_91: 1.34.2.2
+	merge-unicode-to-trunk: 1.37
+	before-merge-unicode-to-trunk: 1.37
+	EMACS_PRETEST_22_1_90: 1.34.2.2
+	lexbind-base: 1.40
+	merge-multi-tty-to-trunk: 1.35
+	before-merge-multi-tty-to-trunk: 1.35
+	EMACS_22_1: 1.34
+	EMACS_PRETEST_22_0_990: 1.34
+	multi-tty: 1.34.0.4
+	multi-tty-base: 1.35
+	EMACS_22_BRANCHPOINT: 1.34
+	EMACS_PRETEST_22_0_99: 1.34
+	EMACS_22_BASE: 1.34.0.2
+	EMACS_PRETEST_22_0_98: 1.34
+	EMACS_PRETEST_22_0_97: 1.34
+	EMACS_PRETEST_22_0_96: 1.34
+	EMACS_PRETEST_22_0_95: 1.34
+	EMACS_PRETEST_22_0_94: 1.33
+	EMACS_PRETEST_22_0_93: 1.33
+	EMACS_PRETEST_22_0_92: 1.32
+	EMACS_PRETEST_22_0_91: 1.32
+	EMACS_PRETEST_22_0_90: 1.32
+	unicode-post-font-backend: 1.26.6.6
+	unicode-pre-font-backend: 1.26.6.6
+	unicode-xft: 1.26.6.6.0.2
+	unicode-xft-base: 1.26.6.8
+	ttn-vms-21-2-B4: 1.25
+	ttn-vms-21-2-B3: 1.25
+	ttn-vms-21-2-B2: 1.25
+	XFT_JHD_BRANCH_base: 1.27
+	XFT_JHD_BRANCH: 1.27.0.4
+	EMACS_19_34: 1.16
+	after-merge-gnus-5_10: 1.27
+	before-merge-gnus-5_10: 1.27
+	gnus-5_10-post-merge-josefsson: 1.27
+	gnus-5_10-pre-merge-josefsson: 1.27
+	gnus-5_10-post-merge-yamaoka: 1.27
+	gnus-5_10-pre-merge-yamaoka: 1.27
+	gnus-5_10-branch: 1.27.0.2
+	gnus-5_10-branchpoint: 1.27
+	emacs-unicode-2-pre-sync: 1.26.6.1
+	ttn-vms-21-3-stash: 1.25.0.12
+	ttn-vms-21-2-stash: 1.25.0.10
+	EMACS_21_2: 1.25
+	handa-temp-tag: 1.27
+	emacs-bidi: 1.26.0.8
+	emacs-bidi-base: 1.26
+	emacs-unicode-2: 1.26.0.6
+	emacs-unicode-2-base: 1.37
+	Boehm-GC: 1.26.0.4
+	Boehm-GC-base: 1.26
+	EMACS_21_3: 1.25
+	rmail-mbox-branch: 1.26.0.2
+	RMAIL-MBOX-BASE: 1.26
+	EMACS_PRETEST_21_2_95: 1.25
+	EMACS_PRETEST_21_2_94: 1.25
+	EMACS_PRETEST_21_2_93: 1.25
+	EMACS_PRETEST_21_2_92: 1.25
+	EMACS_PRETEST_21_2_91: 1.25
+	lexbind: 1.25.0.8
+	emacs-unicode: 1.25.0.6
+	emacs-unicode-base: 1.25
+	fx-branch-base: 1.22
+	EMACS_21_1: 1.25
+	EMACS_21_1_RC: 1.25.0.4
+	EMACS_21_1_BASE: 1.25
+	patches_21_0: 1.25.0.2
+	patches_21_0_base: 1.25
+	EMACS_PRETEST_21_0_106: 1.25
+	EMACS_PRETEST_21_0_105: 1.25
+	EMACS_PRETEST_21_0_104: 1.24
+	EMACS_20_2: 1.17
+	gerd_big: 1.24.0.8
+	gerd_int: 1.24.0.6
+	gerd_dbe: 1.24.0.4
+	gerd_defvaralias: 1.24.0.2
+	EMACS_20_4: 1.21
+	EMACS_PRETEST_21_0_103: 1.24
+	EMACS_PRETEST_21_0_102: 1.22
+	EMACS_PRETEST_21_0_101: 1.22
+	EMACS_PRETEST_21_0_100: 1.22
+	EMACS_PRETEST_21_0_99: 1.22
+	EMACS_PRETEST_21_0_98: 1.22
+	fx-branch: 1.22.0.2
+	EMACS_PRETEST_21_0_97: 1.22
+	EMACS_PRETEST_21_0_96: 1.22
+	EMACS_PRETEST_21_0_95: 1.22
+	EMACS_PRETEST_21_0_93: 1.22
+	EMACS_PRETEST_21_0_92: 1.22
+	EMACS_PRETEST_21_0_91: 1.22
+	EMACS_PRETEST_21_0_90: 1.22
+keyword substitution: kv
+total revisions: 81;	selected revisions: 81
+description:
+;;; rmailedit.el --- "RMAIL edit mode"  Edit the current message.
+----------------------------
+revision 1.40 (patched)
+date: 2008-06-12 03:49:33 +0000;  author: gm;  state: Exp;  lines: +4 -3;  commitid: s3rjSzyieiOrUB6t;
+(rmail-cease-edit): Check tool-bar-mode is bound.
+----------------------------
+revision 1.39 (patched)
+date: 2008-05-06 07:22:27 +0000;  author: gm;  state: Exp;  lines: +4 -6;  commitid: nPdVwGEZ0V6bhS1t;
+Switch to recommended form of GPLv3 permissions notice.
+----------------------------
+revision 1.38 (patched)
+date: 2008-04-10 14:10:19 +0000;  author: monnier;  state: Exp;  lines: +1 -1;  commitid: vwbWV2GwRKWGmzYs;
+Fix up comment convention on the arch-tag lines.
+----------------------------
+revision 1.37 (irrelevant)
+date: 2008-01-08 20:45:05 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: GLqjDoDkbCnkxEMs;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-987
+----------------------------
+revision 1.36 (patched)
+date: 2007-11-25 16:48:31 +0000;  author: dann;  state: Exp;  lines: +3 -0;  commitid: AG5BA1V4T2VeEYGs;
+* mail/mspools.el (rmail-get-new-mail):
+* mail/reporter.el (mail-position-on-field, mail-text):
+* mail/rmail.el (mail-position-on-field, mail-text-start)
+(rmail-update-summary):
+* mail/rmailedit.el (rmail-summary-disable)
+(rmail-summary-enable):
+* mail/rmailmsc.el (rmail-parse-file-inboxes)
+(rmail-show-message):
+* mail/rmailout.el (rmail-update-summary):
+* mail/rmailsort.el (rmail-update-summary):
+* mail/sendmail.el (dired-move-to-filename, dired-get-filename)
+(dired-view-file):
+* mail/uce.el (mail-strip-quoted-names):
+* mail/undigest.el (rmail-update-summary):
+* mail/unrmail.el (mail-strip-quoted-names):
+* ediff.el (diff-latest-backup-file): Declare as functions.
+
+* obsolete/mlsupport.el (ml-previous-page): Fix typo.
+(kill-to-end-of-line):
+* obsolete/rnews.el (news-set-minor-modes): Remove non working
+functions.
+----------------------------
+revision 1.35 (irrelevant)
+date: 2007-07-26 05:27:13 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: IKTBbGNFxqtbNers;
+Merge from emacs--rel--22
+
+Patches applied:
+
+ * emacs--rel--22  (patch 70-73)
+
+   - Update from CVS
+
[phone]  Glenn Morris  <[e-mail]>
+
+   * Relicense all FSF files to GPLv3 or later.
+
+Revision: [e-mail]/emacs--devo--0--patch-828
+----------------------------
+revision 1.34 (irrelevant)
+date: 2007-02-23 20:00:31 +0000;  author: eliz;  state: Exp;  lines: +1 -0;
+branches:  1.34.2;  1.34.4;
+(rmail-cease-edit): Restore the Rmail toolbar.
+----------------------------
+revision 1.33 (irrelevant)
+date: 2007-01-21 02:59:07 +0000;  author: gm;  state: Exp;  lines: +1 -1;
+Add 2007 to copyright years.
+----------------------------
+revision 1.32 (irrelevant)
+date: 2006-02-06 12:31:40 +0000;  author: ttn;  state: Exp;  lines: +1 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.31 (irrelevant)
+date: 2005-08-06 18:54:05 +0000;  author: ttn;  state: Exp;  lines: +2 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.30 (irrelevant)
+date: 2005-07-04 17:46:22 +0000;  author: lute;  state: Exp;  lines: +2 -2;
+Update FSF's address.
+----------------------------
+revision 1.29 (applied)
+date: 2005-06-14 12:08:43 +0000;  author: lute;  state: Exp;  lines: +1 -1;
+(rmail-edit-mode): Use delay-mode-hooks.
+----------------------------
+revision 1.28 (applied)
+date: 2005-05-26 15:17:14 +0000;  author: lute;  state: Exp;  lines: +1 -1;
+(rmail-edit-mode): Use run-mode-hooks.
+----------------------------
+revision 1.27 (applied)
+date: 2003-09-01 15:45:30 +0000;  author: miles;  state: Exp;  lines: +1 -0;
+branches:  1.27.4;
+Add arch taglines
+----------------------------

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/mail/mbox-changes/rmailkwd.el.changes	Mon Aug 18 05:18:52 2008 +0000
@@ -0,0 +1,223 @@
+RCS file: /cvsroot/emacs/emacs/lisp/mail/rmailkwd.el,v
+Working file: rmailkwd.el
+head: 1.25
+branch:
+locks: strict
+access list:
+symbolic names:
+	remove-vms: 1.25
+	before-remove-vms: 1.25
+	remove-carbon: 1.25
+	before-remove-carbon: 1.25
+	before-merge-emacs-app-to-trunk: 1.25
+	font-backend: 1.24.0.2
+	font-backend-base: 1.24
+	EMACS_22_2: 1.20.2.2
+	EMACS_PRETEST_22_1_92: 1.20.2.2
+	lisp-bob: 1.23
+	EMACS_PRETEST_22_1_91: 1.20.2.2
+	merge-unicode-to-trunk: 1.23
+	before-merge-unicode-to-trunk: 1.23
+	EMACS_PRETEST_22_1_90: 1.20.2.2
+	lexbind-base: 1.25
+	merge-multi-tty-to-trunk: 1.21
+	before-merge-multi-tty-to-trunk: 1.21
+	EMACS_22_1: 1.20
+	EMACS_PRETEST_22_0_990: 1.20
+	multi-tty: 1.20.0.4
+	multi-tty-base: 1.21
+	EMACS_22_BRANCHPOINT: 1.20
+	EMACS_PRETEST_22_0_99: 1.20
+	EMACS_22_BASE: 1.20.0.2
+	EMACS_PRETEST_22_0_98: 1.20
+	EMACS_PRETEST_22_0_97: 1.20
+	EMACS_PRETEST_22_0_96: 1.20
+	EMACS_PRETEST_22_0_95: 1.20
+	EMACS_PRETEST_22_0_94: 1.20
+	EMACS_PRETEST_22_0_93: 1.20
+	EMACS_PRETEST_22_0_92: 1.19
+	EMACS_PRETEST_22_0_91: 1.19
+	EMACS_PRETEST_22_0_90: 1.19
+	unicode-post-font-backend: 1.14.14.5
+	unicode-pre-font-backend: 1.14.14.5
+	unicode-xft: 1.14.14.5.0.2
+	unicode-xft-base: 1.14.14.6
+	ttn-vms-21-2-B4: 1.14
+	ttn-vms-21-2-B3: 1.14
+	ttn-vms-21-2-B2: 1.14
+	XFT_JHD_BRANCH_base: 1.15
+	XFT_JHD_BRANCH: 1.15.0.4
+	EMACS_19_34: 1.10
+	after-merge-gnus-5_10: 1.15
+	before-merge-gnus-5_10: 1.15
+	gnus-5_10-post-merge-josefsson: 1.15
+	gnus-5_10-pre-merge-josefsson: 1.15
+	gnus-5_10-post-merge-yamaoka: 1.15
+	gnus-5_10-pre-merge-yamaoka: 1.15
+	gnus-5_10-branch: 1.15.0.2
+	gnus-5_10-branchpoint: 1.15
+	emacs-unicode-2-pre-sync: 1.14.14.1
+	ttn-vms-21-3-stash: 1.14.0.20
+	ttn-vms-21-2-stash: 1.14.0.18
+	EMACS_21_2: 1.14
+	handa-temp-tag: 1.15
+	emacs-bidi: 1.14.0.16
+	emacs-bidi-base: 1.14
+	emacs-unicode-2: 1.14.0.14
+	emacs-unicode-2-base: 1.23
+	Boehm-GC: 1.14.0.12
+	Boehm-GC-base: 1.14
+	EMACS_21_3: 1.14
+	rmail-mbox-branch: 1.14.0.10
+	RMAIL-MBOX-BASE: 1.14
+	EMACS_PRETEST_21_2_95: 1.14
+	EMACS_PRETEST_21_2_94: 1.14
+	EMACS_PRETEST_21_2_93: 1.14
+	EMACS_PRETEST_21_2_92: 1.14
+	EMACS_PRETEST_21_2_91: 1.14
+	lexbind: 1.14.0.8
+	emacs-unicode: 1.14.0.6
+	emacs-unicode-base: 1.14
+	fx-branch-base: 1.12
+	EMACS_21_1: 1.14
+	EMACS_21_1_RC: 1.14.0.4
+	EMACS_21_1_BASE: 1.14
+	patches_21_0: 1.14.0.2
+	patches_21_0_base: 1.14
+	EMACS_PRETEST_21_0_106: 1.14
+	EMACS_PRETEST_21_0_105: 1.14
+	EMACS_PRETEST_21_0_104: 1.13
+	EMACS_20_2: 1.12
+	gerd_big: 1.13.0.8
+	gerd_int: 1.13.0.6
+	gerd_dbe: 1.13.0.4
+	gerd_defvaralias: 1.13.0.2
+	EMACS_20_4: 1.12
+	EMACS_PRETEST_21_0_103: 1.13
+	EMACS_PRETEST_21_0_102: 1.12
+	EMACS_PRETEST_21_0_101: 1.12
+	EMACS_PRETEST_21_0_100: 1.12
+	EMACS_PRETEST_21_0_99: 1.12
+	EMACS_PRETEST_21_0_98: 1.12
+	fx-branch: 1.12.0.2
+	EMACS_PRETEST_21_0_97: 1.12
+	EMACS_PRETEST_21_0_96: 1.12
+	EMACS_PRETEST_21_0_95: 1.12
+	EMACS_PRETEST_21_0_93: 1.12
+	EMACS_PRETEST_21_0_92: 1.12
+	EMACS_PRETEST_21_0_91: 1.12
+	EMACS_PRETEST_21_0_90: 1.12
+keyword substitution: kv
+total revisions: 61;	selected revisions: 61
+description:
+;;; rmailkwd.el --- part of the "RMAIL" mail reader for Emacs.
+----------------------------
+revision 1.25
+date: 2008-05-06 07:22:27 +0000;  author: gm;  state: Exp;  lines: +4 -6;  commitid: nPdVwGEZ0V6bhS1t;
+Switch to recommended form of GPLv3 permissions notice.
+----------------------------
+revision 1.24 (patched)
+date: 2008-04-10 14:10:20 +0000;  author: monnier;  state: Exp;  lines: +1 -1;  commitid: vwbWV2GwRKWGmzYs;
+Fix up comment convention on the arch-tag lines.
+----------------------------
+revision 1.23 (patched)
+date: 2008-01-08 20:45:05 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: GLqjDoDkbCnkxEMs;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-987
+----------------------------
+revision 1.22 (patched)
+date: 2007-11-27 06:57:06 +0000;  author: dann;  state: Exp;  lines: +9 -0;  commitid: 2IinMqAAxCxbjbHs;
+* progmodes/cperl-mode.el (compilation-error-regexp-alist): Pacify
+byte compiler.
+(cperl-mode): Use with-no-warnings for setting vc-header-alist.
+
+* progmodes/idlwave.el (idlwave-shell-get-path-info)
+(idlwave-shell-temp-file, idlwave-shell-is-running)
+(widget-value, comint-dynamic-complete-filename, Info-goto-node):
+* progmodes/idlw-help.el (idlwave-prepare-structure-tag-completion)
+(idlwave-all-method-classes, idlwave-all-method-keyword-classes)
+(idlwave-beginning-of-statement, idlwave-best-rinfo-assoc)
+(idlwave-class-found-in, idlwave-class-or-superclass-with-tag)
+(idlwave-completing-read, idlwave-current-routine)
+(idlwave-downcase-safe, idlwave-entry-find-keyword)
+(idlwave-expand-keyword, idlwave-find-class-definition)
+(idlwave-find-inherited-class, idlwave-find-struct-tag)
+(idlwave-get-buffer-visiting, idlwave-in-quote)
+(idlwave-make-full-name, idlwave-members-only)
+(idlwave-popup-select, idlwave-routine-source-file)
+(idlwave-routines, idlwave-sintern-class)
+(idlwave-sintern-keyword, idlwave-sintern-method)
+(idlwave-sintern-routine-or-method)
+(idlwave-substitute-link-target, idlwave-sys-dir)
+(idlwave-this-word, idlwave-what-module-find-class)
+(idlwave-where):
+* progmodes/idlw-complete-structtag.el (idlwave-shell-buffer):
+* mail/uce.el (rmail-msg-is-pruned)
+(rmail-maybe-set-message-counters, rmail-msgbeg, rmail-msgend)
+(rmail-toggle-header):
+* mail/sendmail.el (dired-view-file, dired-get-filename):
+* mail/rmailkwd.el (rmail-maybe-set-message-counters)
+(rmail-display-labels, rmail-msgbeg)
+(rmail-set-message-deleted-p, rmail-message-labels-p)
+(rmail-show-message, mail-comma-list-regexp)
+(mail-parse-comma-list):
+* mail/rmail.el (rmail-spam-filter, rmail-summary-goto-msg)
+(rmail-summary-mark-undeleted, rmail-summary-mark-deleted)
+(rfc822-addresses, mail-abbrev-make-syntax-table)
+(mail-sendmail-delimit-header, mail-header-end):
+* mail/hashcash.el (message-narrow-to-headers-or-head)
+(message-fetch-field, message-goto-eoh)
+(message-narrow-to-headers):
+* vc.el (view-mode-exit): Declare as functions.
+
+* mail/vms-pmail.el:
+* vmsproc.el:
+* vms-patch.el: Don't byte compile these files, they don't work.
+
+* Makefile.in (SOME_MACHINE_LISP): Remove VMS files, they are not
+compiled anymore.
+----------------------------
+revision 1.21 (irrelevant)
+date: 2007-07-26 05:27:13 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: IKTBbGNFxqtbNers;
+Merge from emacs--rel--22
+
+Patches applied:
+
+ * emacs--rel--22  (patch 70-73)
+
+   - Update from CVS
+
[phone]  Glenn Morris  <[e-mail]>
+
+   * Relicense all FSF files to GPLv3 or later.
+
+Revision: [e-mail]/emacs--devo--0--patch-828
+----------------------------
+revision 1.20 (applied)
+date: 2007-01-21 02:59:07 +0000;  author: gm;  state: Exp;  lines: +1 -1;
+branches:  1.20.2;  1.20.4;
+Add 2007 to copyright years.
+----------------------------
+revision 1.19 (applied)
+date: 2006-02-06 12:31:40 +0000;  author: ttn;  state: Exp;  lines: +1 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.18 (applied)
+date: 2005-08-29 14:37:35 +0000;  author: lektu;  state: Exp;  lines: +7 -0;
+(rmail-buffer, rmail-current-message, rmail-last-label, rmail-last-multi-labels,
+rmail-summary-vector, rmail-total-messages): Add defvars.
+----------------------------
+revision 1.17 (applied)
+date: 2005-08-06 18:54:05 +0000;  author: ttn;  state: Exp;  lines: +2 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.16 (irrelevant)
+date: 2005-07-04 17:46:22 +0000;  author: lute;  state: Exp;  lines: +2 -2;
+Update FSF's address.
+----------------------------
+revision 1.15 (applied)
+date: 2003-09-01 15:45:30 +0000;  author: miles;  state: Exp;  lines: +1 -0;
+branches:  1.15.4;
+Add arch taglines
+----------------------------

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/mail/mbox-changes/rmailmsc.el.changes	Mon Aug 18 05:18:52 2008 +0000
@@ -0,0 +1,198 @@
+RCS file: /cvsroot/emacs/emacs/lisp/mail/rmailmsc.el,v
+Working file: rmailmsc.el
+head: 1.24
+branch:
+locks: strict
+access list:
+symbolic names:
+	remove-vms: 1.24
+	before-remove-vms: 1.24
+	remove-carbon: 1.24
+	before-remove-carbon: 1.24
+	before-merge-emacs-app-to-trunk: 1.24
+	font-backend: 1.23.0.2
+	font-backend-base: 1.23
+	EMACS_22_2: 1.19.2.2
+	EMACS_PRETEST_22_1_92: 1.19.2.2
+	lisp-bob: 1.22
+	EMACS_PRETEST_22_1_91: 1.19.2.2
+	merge-unicode-to-trunk: 1.22
+	before-merge-unicode-to-trunk: 1.22
+	EMACS_PRETEST_22_1_90: 1.19.2.2
+	lexbind-base: 1.24
+	merge-multi-tty-to-trunk: 1.20
+	before-merge-multi-tty-to-trunk: 1.20
+	EMACS_22_1: 1.19
+	EMACS_PRETEST_22_0_990: 1.19
+	multi-tty: 1.19.0.4
+	multi-tty-base: 1.20
+	EMACS_22_BRANCHPOINT: 1.19
+	EMACS_PRETEST_22_0_99: 1.19
+	EMACS_22_BASE: 1.19.0.2
+	EMACS_PRETEST_22_0_98: 1.19
+	EMACS_PRETEST_22_0_97: 1.19
+	EMACS_PRETEST_22_0_96: 1.19
+	EMACS_PRETEST_22_0_95: 1.19
+	EMACS_PRETEST_22_0_94: 1.19
+	EMACS_PRETEST_22_0_93: 1.19
+	EMACS_PRETEST_22_0_92: 1.18
+	EMACS_PRETEST_22_0_91: 1.17
+	EMACS_PRETEST_22_0_90: 1.17
+	unicode-post-font-backend: 1.12.14.5
+	unicode-pre-font-backend: 1.12.14.5
+	unicode-xft: 1.12.14.5.0.2
+	unicode-xft-base: 1.12.14.7
+	ttn-vms-21-2-B4: 1.12
+	ttn-vms-21-2-B3: 1.12
+	ttn-vms-21-2-B2: 1.12
+	XFT_JHD_BRANCH_base: 1.13
+	XFT_JHD_BRANCH: 1.13.0.4
+	EMACS_19_34: 1.9
+	after-merge-gnus-5_10: 1.13
+	before-merge-gnus-5_10: 1.13
+	gnus-5_10-post-merge-josefsson: 1.13
+	gnus-5_10-pre-merge-josefsson: 1.13
+	gnus-5_10-post-merge-yamaoka: 1.13
+	gnus-5_10-pre-merge-yamaoka: 1.13
+	gnus-5_10-branch: 1.13.0.2
+	gnus-5_10-branchpoint: 1.13
+	emacs-unicode-2-pre-sync: 1.12.14.1
+	ttn-vms-21-3-stash: 1.12.0.20
+	ttn-vms-21-2-stash: 1.12.0.18
+	EMACS_21_2: 1.12
+	handa-temp-tag: 1.13
+	emacs-bidi: 1.12.0.16
+	emacs-bidi-base: 1.12
+	emacs-unicode-2: 1.12.0.14
+	emacs-unicode-2-base: 1.22
+	Boehm-GC: 1.12.0.12
+	Boehm-GC-base: 1.12
+	EMACS_21_3: 1.12
+	rmail-mbox-branch: 1.12.0.10
+	RMAIL-MBOX-BASE: 1.12
+	EMACS_PRETEST_21_2_95: 1.12
+	EMACS_PRETEST_21_2_94: 1.12
+	EMACS_PRETEST_21_2_93: 1.12
+	EMACS_PRETEST_21_2_92: 1.12
+	EMACS_PRETEST_21_2_91: 1.12
+	lexbind: 1.12.0.8
+	emacs-unicode: 1.12.0.6
+	emacs-unicode-base: 1.12
+	fx-branch-base: 1.11
+	EMACS_21_1: 1.12
+	EMACS_21_1_RC: 1.12.0.4
+	EMACS_21_1_BASE: 1.12
+	patches_21_0: 1.12.0.2
+	patches_21_0_base: 1.12
+	EMACS_PRETEST_21_0_106: 1.12
+	EMACS_PRETEST_21_0_105: 1.12
+	EMACS_PRETEST_21_0_104: 1.11
+	EMACS_20_2: 1.10
+	gerd_big: 1.11.0.10
+	gerd_int: 1.11.0.8
+	gerd_dbe: 1.11.0.6
+	gerd_defvaralias: 1.11.0.4
+	EMACS_20_4: 1.11
+	EMACS_PRETEST_21_0_103: 1.11
+	EMACS_PRETEST_21_0_102: 1.11
+	EMACS_PRETEST_21_0_101: 1.11
+	EMACS_PRETEST_21_0_100: 1.11
+	EMACS_PRETEST_21_0_99: 1.11
+	EMACS_PRETEST_21_0_98: 1.11
+	fx-branch: 1.11.0.2
+	EMACS_PRETEST_21_0_97: 1.11
+	EMACS_PRETEST_21_0_96: 1.11
+	EMACS_PRETEST_21_0_95: 1.11
+	EMACS_PRETEST_21_0_93: 1.11
+	EMACS_PRETEST_21_0_92: 1.11
+	EMACS_PRETEST_21_0_91: 1.11
+	EMACS_PRETEST_21_0_90: 1.11
+keyword substitution: kv
+total revisions: 55;	selected revisions: 55
+description:
+;;; rmailmsc.el --- miscellaneous support functions for the RMAIL mail reader
+----------------------------
+revision 1.24 (patched)
+date: 2008-05-06 07:22:27 +0000;  author: gm;  state: Exp;  lines: +4 -6;  commitid: nPdVwGEZ0V6bhS1t;
+Switch to recommended form of GPLv3 permissions notice.
+----------------------------
+revision 1.23 (patched)
+date: 2008-04-10 14:10:20 +0000;  author: monnier;  state: Exp;  lines: +1 -1;  commitid: vwbWV2GwRKWGmzYs;
+Fix up comment convention on the arch-tag lines.
+----------------------------
+revision 1.22 (patched)
+date: 2008-01-08 20:45:05 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: GLqjDoDkbCnkxEMs;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-987
+----------------------------
+revision 1.21 (patched)
+date: 2007-11-25 16:48:31 +0000;  author: dann;  state: Exp;  lines: +3 -0;  commitid: AG5BA1V4T2VeEYGs;
+* mail/mspools.el (rmail-get-new-mail):
+* mail/reporter.el (mail-position-on-field, mail-text):
+* mail/rmail.el (mail-position-on-field, mail-text-start)
+(rmail-update-summary):
+* mail/rmailedit.el (rmail-summary-disable)
+(rmail-summary-enable):
+* mail/rmailmsc.el (rmail-parse-file-inboxes)
+(rmail-show-message):
+* mail/rmailout.el (rmail-update-summary):
+* mail/rmailsort.el (rmail-update-summary):
+* mail/sendmail.el (dired-move-to-filename, dired-get-filename)
+(dired-view-file):
+* mail/uce.el (mail-strip-quoted-names):
+* mail/undigest.el (rmail-update-summary):
+* mail/unrmail.el (mail-strip-quoted-names):
+* ediff.el (diff-latest-backup-file): Declare as functions.
+
+* obsolete/mlsupport.el (ml-previous-page): Fix typo.
+(kill-to-end-of-line):
+* obsolete/rnews.el (news-set-minor-modes): Remove non working
+functions.
+----------------------------
+revision 1.20 (irrelevant)
+date: 2007-07-26 05:27:13 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: IKTBbGNFxqtbNers;
+Merge from emacs--rel--22
+
+Patches applied:
+
+ * emacs--rel--22  (patch 70-73)
+
+   - Update from CVS
+
[phone]  Glenn Morris  <[e-mail]>
+
+   * Relicense all FSF files to GPLv3 or later.
+
+Revision: [e-mail]/emacs--devo--0--patch-828
+----------------------------
+revision 1.19 (patched)
+date: 2007-01-21 02:59:07 +0000;  author: gm;  state: Exp;  lines: +1 -1;
+branches:  1.19.2;  1.19.4;
+Add 2007 to copyright years.
+----------------------------
+revision 1.18 (patched)
+date: 2006-12-09 03:28:37 +0000;  author: gm;  state: Exp;  lines: +1 -1;
+Update copyright years.
+----------------------------
+revision 1.17 (applied)
+date: 2006-02-06 12:31:40 +0000;  author: ttn;  state: Exp;  lines: +2 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.16 (applied)
+date: 2005-08-29 14:36:43 +0000;  author: lektu;  state: Exp;  lines: +3 -0;
+(rmail-current-message, rmail-inbox-list): Add defvars.
+----------------------------
+revision 1.15 (applied)
+date: 2005-08-06 18:54:05 +0000;  author: ttn;  state: Exp;  lines: +1 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.14 (irrelevant)
+date: 2005-07-04 17:46:22 +0000;  author: lute;  state: Exp;  lines: +2 -2;
+Update FSF's address.
+----------------------------
+revision 1.13 (applied)
+date: 2003-09-01 15:45:31 +0000;  author: miles;  state: Exp;  lines: +1 -0;
+branches:  1.13.4;
+Add arch taglines
+----------------------------

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/mail/mbox-changes/rmailout.el.changes	Mon Aug 18 05:18:52 2008 +0000
@@ -0,0 +1,280 @@
+RCS file: /cvsroot/emacs/emacs/lisp/mail/rmailout.el,v
+Working file: rmailout.el
+head: 1.81
+branch:
+locks: strict
+access list:
+symbolic names:
+	remove-vms: 1.81
+	before-remove-vms: 1.81
+	remove-carbon: 1.81
+	before-remove-carbon: 1.81
+	before-merge-emacs-app-to-trunk: 1.81
+	font-backend: 1.80.0.2
+	font-backend-base: 1.80
+	EMACS_22_2: 1.75.2.2
+	EMACS_PRETEST_22_1_92: 1.75.2.2
+	lisp-bob: 1.79
+	EMACS_PRETEST_22_1_91: 1.75.2.2
+	merge-unicode-to-trunk: 1.79
+	before-merge-unicode-to-trunk: 1.79
+	EMACS_PRETEST_22_1_90: 1.75.2.2
+	lexbind-base: 1.81
+	merge-multi-tty-to-trunk: 1.76
+	before-merge-multi-tty-to-trunk: 1.76
+	EMACS_22_1: 1.75
+	EMACS_PRETEST_22_0_990: 1.75
+	multi-tty: 1.75.0.4
+	multi-tty-base: 1.76
+	EMACS_22_BRANCHPOINT: 1.75
+	EMACS_PRETEST_22_0_99: 1.75
+	EMACS_22_BASE: 1.75.0.2
+	EMACS_PRETEST_22_0_98: 1.75
+	EMACS_PRETEST_22_0_97: 1.75
+	EMACS_PRETEST_22_0_96: 1.75
+	EMACS_PRETEST_22_0_95: 1.75
+	EMACS_PRETEST_22_0_94: 1.75
+	EMACS_PRETEST_22_0_93: 1.75
+	EMACS_PRETEST_22_0_92: 1.74
+	EMACS_PRETEST_22_0_91: 1.74
+	EMACS_PRETEST_22_0_90: 1.73
+	unicode-post-font-backend: 1.66.6.7
+	unicode-pre-font-backend: 1.66.6.7
+	unicode-xft: 1.66.6.7.0.2
+	unicode-xft-base: 1.66.6.9
+	ttn-vms-21-2-B4: 1.65
+	ttn-vms-21-2-B3: 1.65
+	ttn-vms-21-2-B2: 1.65
+	XFT_JHD_BRANCH_base: 1.67
+	XFT_JHD_BRANCH: 1.67.0.4
+	EMACS_19_34: 1.43
+	after-merge-gnus-5_10: 1.67
+	before-merge-gnus-5_10: 1.67
+	gnus-5_10-post-merge-josefsson: 1.67
+	gnus-5_10-pre-merge-josefsson: 1.67
+	gnus-5_10-post-merge-yamaoka: 1.67
+	gnus-5_10-pre-merge-yamaoka: 1.67
+	gnus-5_10-branch: 1.67.0.2
+	gnus-5_10-branchpoint: 1.67
+	emacs-unicode-2-pre-sync: 1.66.6.1
+	ttn-vms-21-3-stash: 1.65.4.1.0.2
+	ttn-vms-21-2-stash: 1.65.0.10
+	EMACS_21_2: 1.65
+	handa-temp-tag: 1.67
+	emacs-bidi: 1.66.0.8
+	emacs-bidi-base: 1.66
+	emacs-unicode-2: 1.66.0.6
+	emacs-unicode-2-base: 1.79
+	Boehm-GC: 1.66.0.4
+	Boehm-GC-base: 1.66
+	EMACS_21_3: 1.65.4.1
+	rmail-mbox-branch: 1.66.0.2
+	RMAIL-MBOX-BASE: 1.66
+	EMACS_PRETEST_21_2_95: 1.65
+	EMACS_PRETEST_21_2_94: 1.65
+	EMACS_PRETEST_21_2_93: 1.65
+	EMACS_PRETEST_21_2_92: 1.65
+	EMACS_PRETEST_21_2_91: 1.65
+	lexbind: 1.65.0.8
+	emacs-unicode: 1.65.0.6
+	emacs-unicode-base: 1.65
+	fx-branch-base: 1.61
+	EMACS_21_1: 1.65
+	EMACS_21_1_RC: 1.65.0.4
+	EMACS_21_1_BASE: 1.65
+	patches_21_0: 1.65.0.2
+	patches_21_0_base: 1.65
+	EMACS_PRETEST_21_0_106: 1.65
+	EMACS_PRETEST_21_0_105: 1.65
+	EMACS_PRETEST_21_0_104: 1.64
+	EMACS_20_2: 1.49
+	gerd_big: 1.63.0.8
+	gerd_int: 1.63.0.6
+	gerd_dbe: 1.63.0.4
+	gerd_defvaralias: 1.63.0.2
+	EMACS_20_4: 1.60
+	EMACS_PRETEST_21_0_103: 1.63
+	EMACS_PRETEST_21_0_102: 1.62
+	EMACS_PRETEST_21_0_101: 1.62
+	EMACS_PRETEST_21_0_100: 1.62
+	EMACS_PRETEST_21_0_99: 1.61
+	EMACS_PRETEST_21_0_98: 1.61
+	fx-branch: 1.61.0.2
+	EMACS_PRETEST_21_0_97: 1.61
+	EMACS_PRETEST_21_0_96: 1.61
+	EMACS_PRETEST_21_0_95: 1.61
+	EMACS_PRETEST_21_0_93: 1.61
+	EMACS_PRETEST_21_0_92: 1.61
+	EMACS_PRETEST_21_0_91: 1.61
+	EMACS_PRETEST_21_0_90: 1.61
+keyword substitution: kv
+total revisions: 125;	selected revisions: 125
+description:
+;;; rmailout.el --- "RMAIL" mail reader for Emacs: output message to a file.
+----------------------------
+revision 1.81 (patched)
+date: 2008-05-06 07:22:27 +0000;  author: gm;  state: Exp;  lines: +4 -6;  commitid: nPdVwGEZ0V6bhS1t;
+Switch to recommended form of GPLv3 permissions notice.
+----------------------------
+revision 1.80 (patched)
+date: 2008-04-10 14:10:20 +0000;  author: monnier;  state: Exp;  lines: +1 -1;  commitid: vwbWV2GwRKWGmzYs;
+Fix up comment convention on the arch-tag lines.
+----------------------------
+revision 1.79 (patched)
+date: 2008-01-08 20:45:08 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: GLqjDoDkbCnkxEMs;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-987
+----------------------------
+revision 1.78 (rewritten)
+date: 2007-12-06 18:18:13 +0000;  author: deego;  state: Exp;  lines: +1 -1;  commitid: yyQGP90vuBpXMoIs;
+Fix buggy calls to `error'.
+----------------------------
+revision 1.77 (patched)
+date: 2007-11-25 16:48:31 +0000;  author: dann;  state: Exp;  lines: +2 -0;  commitid: AG5BA1V4T2VeEYGs;
+* mail/mspools.el (rmail-get-new-mail):
+* mail/reporter.el (mail-position-on-field, mail-text):
+* mail/rmail.el (mail-position-on-field, mail-text-start)
+(rmail-update-summary):
+* mail/rmailedit.el (rmail-summary-disable)
+(rmail-summary-enable):
+* mail/rmailmsc.el (rmail-parse-file-inboxes)
+(rmail-show-message):
+* mail/rmailout.el (rmail-update-summary):
+* mail/rmailsort.el (rmail-update-summary):
+* mail/sendmail.el (dired-move-to-filename, dired-get-filename)
+(dired-view-file):
+* mail/uce.el (mail-strip-quoted-names):
+* mail/undigest.el (rmail-update-summary):
+* mail/unrmail.el (mail-strip-quoted-names):
+* ediff.el (diff-latest-backup-file): Declare as functions.
+
+* obsolete/mlsupport.el (ml-previous-page): Fix typo.
+(kill-to-end-of-line):
+* obsolete/rnews.el (news-set-minor-modes): Remove non working
+functions.
+----------------------------
+revision 1.76 (irrelevant)
+date: 2007-07-26 05:27:13 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: IKTBbGNFxqtbNers;
+Merge from emacs--rel--22
+
+Patches applied:
+
+ * emacs--rel--22  (patch 70-73)
+
+   - Update from CVS
+
[phone]  Glenn Morris  <[e-mail]>
+
+   * Relicense all FSF files to GPLv3 or later.
+
+Revision: [e-mail]/emacs--devo--0--patch-828
+----------------------------
+revision 1.75 (patched)
+date: 2007-01-21 02:59:07 +0000;  author: gm;  state: Exp;  lines: +1 -1;
+branches:  1.75.2;  1.75.4;
+Add 2007 to copyright years.
+----------------------------
+revision 1.74 (applied)
+date: 2006-11-13 10:25:40 +0000;  author: lektu;  state: Exp;  lines: +1 -1;
+(rmail-output-body-to-file): Use `format', not `message', in `y-or-n-p' call.
+----------------------------
+revision 1.73 (patched)
+date: 2006-02-06 12:31:40 +0000;  author: ttn;  state: Exp;  lines: +1 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.72 (defer)
+date: 2006-01-21 13:16:05 +0000;  author: eliz;  state: Exp;  lines: +5 -3;
+(rmail-output): Don't use content-type if it is nil.
+----------------------------
+revision 1.71 (applied)
+date: 2005-11-04 14:51:08 +0000;  author: eliz;  state: Exp;  lines: +5 -5;
+(rmail-output-to-rmail-file, rmail-output): Doc fix.
+----------------------------
+revision 1.70 (applied)
+date: 2005-09-24 13:43:59 +0000;  author: rfrancoise;  state: Exp;  lines: +4 -4;
[phone]  Emilio C. Lopes  <[e-mail]>
+
+	* woman.el (woman-file-name):
+	* wid-edit.el (widget-file-prompt-value)
+	(widget-coding-system-prompt-value):
+	* w32-fns.el (set-w32-system-coding-system):
+	* vc.el (vc-version-diff, vc-annotate):
+	* textmodes/reftex-auc.el (reftex-arg-cite)
+	(reftex-arg-index-tag):
+	* textmodes/refer.el (refer-get-bib-files):
+	* textmodes/artist.el (artist-figlet-choose-font):
+	* terminal.el (terminal-emulator):
+	* replace.el (occur-read-primary-args):
+	* rect.el (string-rectangle, string-insert-rectangle):
+	* ps-print.el (ps-print-preprint):
+	* progmodes/pascal.el (pascal-goto-defun):
+	* progmodes/etags.el (visit-tags-table, visit-tags-table-buffer):
+	* progmodes/compile.el (compilation-find-file):
+	* printing.el (pr-interactive-n-up):
+	* play/animate.el (animate-birthday-present):
+	* net/rcompile.el (remote-compile):
+	* man.el (man, Man-goto-section, Man-follow-manual-reference):
+	* mail/rmailsum.el (rmail-summary-search-backward)
+	(rmail-summary-search):
+	* mail/rmailout.el (rmail-output-read-rmail-file-name)
+	(rmail-output-read-file-name):
+	* mail/rmail.el (rmail-search, rmail-search-backwards):
+	* mail/mailabbrev.el (merge-mail-abbrevs, rebuild-mail-abbrevs):
+	* locate.el (locate):
+	* international/quail.el (quail-show-keyboard-layout):
+	* international/mule.el (set-buffer-file-coding-system)
+	(revert-buffer-with-coding-system, set-file-name-coding-system)
+	(set-terminal-coding-system, set-keyboard-coding-system)
+	(set-next-selection-coding-system):
+	* international/mule-diag.el (describe-coding-system)
+	(describe-font, describe-fontset):
+	* international/mule-cmds.el (universal-coding-system-argument)
+	(search-unencodable-char, describe-input-method)
+	(set-language-environment, describe-language-environment):
+	* international/codepage.el (codepage-setup):
+	* international/code-pages.el (codepage-setup):
+	* info.el (Info-search, Info-follow-reference)
+	(Info-search-backward):
+	* emacs-lisp/advice.el (ad-read-advised-function)
+	(ad-read-advice-class, ad-clear-cache, ad-activate)
+	(ad-deactivate, ad-update, ad-unadvise, ad-read-advice-name)
+	(ad-enable-advice, ad-disable-advice, ad-remove-advice)
+	(ad-read-regexp):
+	* ediff-util.el (ediff-toggle-regexp-match):
+	* ediff-ptch.el (ediff-prompt-for-patch-file):
+	* dired-aux.el (dired-diff):
+	* diff.el (diff):
+	* cus-edit.el (custom-variable-prompt):
+	* calendar/timeclock.el (timeclock-ask-for-project):
+	* calc/calcalg3.el (calc-get-fit-variables):
+	* calc/calc-store.el (calc-edit-variable)
+	(calc-permanent-variable):
+	* vc-mcvs.el (vc-mcvs-register):
+	* shadowfile.el (shadow-define-literal-group):
+	* woman.el (woman-file-name):
+	* vc.el (vc-version-diff, vc-merge):
+	* textmodes/reftex-index.el (reftex-index-complete-tag):
+	* format.el (format-decode-buffer, format-decode-region):
+	* emulation/viper-cmd.el (viper-read-string-with-history):
+	* emacs-lisp/debug.el (cancel-debug-on-entry):
+	* emacs-lisp/checkdoc.el (checkdoc-this-string-valid-engine):
+	* ediff.el (ediff-merge-revisions)
+	(ediff-merge-revisions-with-ancestor, ediff-revision):
+	* completion.el (interactive-completion-string-reader):
+	* calc/calc-prog.el (calc-user-define-formula):
+	Follow convention for reading with the minibuffer.
+----------------------------
+revision 1.69 (applied)
+date: 2005-08-06 18:54:05 +0000;  author: ttn;  state: Exp;  lines: +2 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.68 (irrelevant)
+date: 2005-07-04 17:46:22 +0000;  author: lute;  state: Exp;  lines: +2 -2;
+Update FSF's address.
+----------------------------
+revision 1.67 (applied)
+date: 2003-09-01 15:45:31 +0000;  author: miles;  state: Exp;  lines: +1 -0;
+branches:  1.67.4;
+Add arch taglines
+----------------------------

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/mail/mbox-changes/rmailsort.el.changes	Mon Aug 18 05:18:52 2008 +0000
@@ -0,0 +1,190 @@
+RCS file: /cvsroot/emacs/emacs/lisp/mail/rmailsort.el,v
+Working file: rmailsort.el
+head: 1.39
+branch:
+locks: strict
+access list:
+symbolic names:
+	remove-vms: 1.39
+	before-remove-vms: 1.39
+	remove-carbon: 1.39
+	before-remove-carbon: 1.39
+	before-merge-emacs-app-to-trunk: 1.39
+	font-backend: 1.38.0.2
+	font-backend-base: 1.38
+	EMACS_22_2: 1.34.2.2
+	EMACS_PRETEST_22_1_92: 1.34.2.2
+	lisp-bob: 1.37
+	EMACS_PRETEST_22_1_91: 1.34.2.2
+	merge-unicode-to-trunk: 1.37
+	before-merge-unicode-to-trunk: 1.37
+	EMACS_PRETEST_22_1_90: 1.34.2.2
+	lexbind-base: 1.39
+	merge-multi-tty-to-trunk: 1.35
+	before-merge-multi-tty-to-trunk: 1.35
+	EMACS_22_1: 1.34
+	EMACS_PRETEST_22_0_990: 1.34
+	multi-tty: 1.34.0.4
+	multi-tty-base: 1.35
+	EMACS_22_BRANCHPOINT: 1.34
+	EMACS_PRETEST_22_0_99: 1.34
+	EMACS_22_BASE: 1.34.0.2
+	EMACS_PRETEST_22_0_98: 1.34
+	EMACS_PRETEST_22_0_97: 1.34
+	EMACS_PRETEST_22_0_96: 1.34
+	EMACS_PRETEST_22_0_95: 1.34
+	EMACS_PRETEST_22_0_94: 1.34
+	EMACS_PRETEST_22_0_93: 1.34
+	EMACS_PRETEST_22_0_92: 1.33
+	EMACS_PRETEST_22_0_91: 1.33
+	EMACS_PRETEST_22_0_90: 1.33
+	unicode-post-font-backend: 1.29.6.4
+	unicode-pre-font-backend: 1.29.6.4
+	unicode-xft: 1.29.6.4.0.2
+	unicode-xft-base: 1.29.6.5
+	ttn-vms-21-2-B4: 1.28
+	ttn-vms-21-2-B3: 1.28
+	ttn-vms-21-2-B2: 1.28
+	XFT_JHD_BRANCH_base: 1.30
+	XFT_JHD_BRANCH: 1.30.0.4
+	EMACS_19_34: 1.24
+	after-merge-gnus-5_10: 1.30
+	before-merge-gnus-5_10: 1.30
+	gnus-5_10-post-merge-josefsson: 1.30
+	gnus-5_10-pre-merge-josefsson: 1.30
+	gnus-5_10-post-merge-yamaoka: 1.30
+	gnus-5_10-pre-merge-yamaoka: 1.30
+	gnus-5_10-branch: 1.30.0.2
+	gnus-5_10-branchpoint: 1.30
+	emacs-unicode-2-pre-sync: 1.29.6.1
+	ttn-vms-21-3-stash: 1.28.0.12
+	ttn-vms-21-2-stash: 1.28.0.10
+	EMACS_21_2: 1.28
+	handa-temp-tag: 1.30
+	emacs-bidi: 1.29.0.8
+	emacs-bidi-base: 1.29
+	emacs-unicode-2: 1.29.0.6
+	emacs-unicode-2-base: 1.37
+	Boehm-GC: 1.29.0.4
+	Boehm-GC-base: 1.29
+	EMACS_21_3: 1.28
+	rmail-mbox-branch: 1.29.0.2
+	RMAIL-MBOX-BASE: 1.29
+	EMACS_PRETEST_21_2_95: 1.28
+	EMACS_PRETEST_21_2_94: 1.28
+	EMACS_PRETEST_21_2_93: 1.28
+	EMACS_PRETEST_21_2_92: 1.28
+	EMACS_PRETEST_21_2_91: 1.28
+	lexbind: 1.28.0.8
+	emacs-unicode: 1.28.0.6
+	emacs-unicode-base: 1.28
+	fx-branch-base: 1.26
+	EMACS_21_1: 1.28
+	EMACS_21_1_RC: 1.28.0.4
+	EMACS_21_1_BASE: 1.28
+	patches_21_0: 1.28.0.2
+	patches_21_0_base: 1.28
+	EMACS_PRETEST_21_0_106: 1.28
+	EMACS_PRETEST_21_0_105: 1.28
+	EMACS_PRETEST_21_0_104: 1.27
+	EMACS_20_2: 1.26
+	gerd_big: 1.27.0.8
+	gerd_int: 1.27.0.6
+	gerd_dbe: 1.27.0.4
+	gerd_defvaralias: 1.27.0.2
+	EMACS_20_4: 1.26
+	EMACS_PRETEST_21_0_103: 1.27
+	EMACS_PRETEST_21_0_102: 1.26
+	EMACS_PRETEST_21_0_101: 1.26
+	EMACS_PRETEST_21_0_100: 1.26
+	EMACS_PRETEST_21_0_99: 1.26
+	EMACS_PRETEST_21_0_98: 1.26
+	fx-branch: 1.26.0.2
+	EMACS_PRETEST_21_0_97: 1.26
+	EMACS_PRETEST_21_0_96: 1.26
+	EMACS_PRETEST_21_0_95: 1.26
+	EMACS_PRETEST_21_0_93: 1.26
+	EMACS_PRETEST_21_0_92: 1.26
+	EMACS_PRETEST_21_0_91: 1.26
+	EMACS_PRETEST_21_0_90: 1.26
+keyword substitution: kv
+total revisions: 66;	selected revisions: 66
+description:
+;;; rmailsort.el --- Rmail: sort messages.
+----------------------------
+revision 1.39 (patched)
+date: 2008-05-06 07:22:28 +0000;  author: gm;  state: Exp;  lines: +4 -6;  commitid: nPdVwGEZ0V6bhS1t;
+Switch to recommended form of GPLv3 permissions notice.
+----------------------------
+revision 1.38 (patched)
+date: 2008-04-10 14:10:20 +0000;  author: monnier;  state: Exp;  lines: +1 -1;  commitid: vwbWV2GwRKWGmzYs;
+Fix up comment convention on the arch-tag lines.
+----------------------------
+revision 1.37 (patched)
+date: 2008-01-08 20:45:06 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: GLqjDoDkbCnkxEMs;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-987
+----------------------------
+revision 1.36 (patched)
+date: 2007-11-25 16:48:31 +0000;  author: dann;  state: Exp;  lines: +1 -0;  commitid: AG5BA1V4T2VeEYGs;
+* mail/mspools.el (rmail-get-new-mail):
+* mail/reporter.el (mail-position-on-field, mail-text):
+* mail/rmail.el (mail-position-on-field, mail-text-start)
+(rmail-update-summary):
+* mail/rmailedit.el (rmail-summary-disable)
+(rmail-summary-enable):
+* mail/rmailmsc.el (rmail-parse-file-inboxes)
+(rmail-show-message):
+* mail/rmailout.el (rmail-update-summary):
+* mail/rmailsort.el (rmail-update-summary):
+* mail/sendmail.el (dired-move-to-filename, dired-get-filename)
+(dired-view-file):
+* mail/uce.el (mail-strip-quoted-names):
+* mail/undigest.el (rmail-update-summary):
+* mail/unrmail.el (mail-strip-quoted-names):
+* ediff.el (diff-latest-backup-file): Declare as functions.
+
+* obsolete/mlsupport.el (ml-previous-page): Fix typo.
+(kill-to-end-of-line):
+* obsolete/rnews.el (news-set-minor-modes): Remove non working
+functions.
+----------------------------
+revision 1.35 (irrelevant)
+date: 2007-07-26 05:27:14 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: IKTBbGNFxqtbNers;
+Merge from emacs--rel--22
+
+Patches applied:
+
+ * emacs--rel--22  (patch 70-73)
+
+   - Update from CVS
+
[phone]  Glenn Morris  <[e-mail]>
+
+   * Relicense all FSF files to GPLv3 or later.
+
+Revision: [e-mail]/emacs--devo--0--patch-828
+----------------------------
+revision 1.34 (patched)
+date: 2007-01-21 02:59:07 +0000;  author: gm;  state: Exp;  lines: +1 -1;
+branches:  1.34.2;  1.34.4;
+Add 2007 to copyright years.
+----------------------------
+revision 1.33 (patched)
+date: 2006-02-06 12:31:40 +0000;  author: ttn;  state: Exp;  lines: +1 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.32 (applied)
+date: 2005-08-06 18:54:05 +0000;  author: ttn;  state: Exp;  lines: +2 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.31 (irrelevant)
+date: 2005-07-04 17:46:22 +0000;  author: lute;  state: Exp;  lines: +2 -2;
+Update FSF's address.
+----------------------------
+revision 1.30 (applied)
+date: 2003-09-01 15:45:32 +0000;  author: miles;  state: Exp;  lines: +1 -0;
+branches:  1.30.4;
+Add arch taglines
+----------------------------

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/mail/mbox-changes/rmailsum.el.changes	Mon Aug 18 05:18:52 2008 +0000
@@ -0,0 +1,408 @@
+RCS file: /cvsroot/emacs/emacs/lisp/mail/rmailsum.el,v
+Working file: rmailsum.el
+head: 1.151
+branch:
+locks: strict
+access list:
+symbolic names:
+	remove-vms: 1.151
+	before-remove-vms: 1.151
+	remove-carbon: 1.151
+	before-remove-carbon: 1.151
+	before-merge-emacs-app-to-trunk: 1.151
+	font-backend: 1.150.0.2
+	font-backend-base: 1.150
+	EMACS_22_2: 1.144.2.4
+	EMACS_PRETEST_22_1_92: 1.144.2.4
+	lisp-bob: 1.149
+	EMACS_PRETEST_22_1_91: 1.144.2.4
+	merge-unicode-to-trunk: 1.149
+	before-merge-unicode-to-trunk: 1.149
+	EMACS_PRETEST_22_1_90: 1.144.2.4
+	lexbind-base: 1.151
+	merge-multi-tty-to-trunk: 1.147
+	before-merge-multi-tty-to-trunk: 1.147
+	EMACS_22_1: 1.144
+	EMACS_PRETEST_22_0_990: 1.144
+	multi-tty: 1.144.0.4
+	multi-tty-base: 1.147
+	EMACS_22_BRANCHPOINT: 1.144
+	EMACS_PRETEST_22_0_99: 1.144
+	EMACS_22_BASE: 1.144.0.2
+	EMACS_PRETEST_22_0_98: 1.144
+	EMACS_PRETEST_22_0_97: 1.144
+	EMACS_PRETEST_22_0_96: 1.144
+	EMACS_PRETEST_22_0_95: 1.144
+	EMACS_PRETEST_22_0_94: 1.144
+	EMACS_PRETEST_22_0_93: 1.144
+	EMACS_PRETEST_22_0_92: 1.143
+	EMACS_PRETEST_22_0_91: 1.143
+	EMACS_PRETEST_22_0_90: 1.143
+	unicode-post-font-backend: 1.128.4.11
+	unicode-pre-font-backend: 1.128.4.11
+	unicode-xft: 1.128.4.11.0.2
+	unicode-xft-base: 1.128.4.13
+	ttn-vms-21-2-B4: 1.120
+	ttn-vms-21-2-B3: 1.120
+	ttn-vms-21-2-B2: 1.120
+	XFT_JHD_BRANCH_base: 1.131
+	XFT_JHD_BRANCH: 1.131.0.4
+	EMACS_19_34: 1.88
+	after-merge-gnus-5_10: 1.131
+	before-merge-gnus-5_10: 1.131
+	gnus-5_10-post-merge-josefsson: 1.131
+	gnus-5_10-pre-merge-josefsson: 1.131
+	gnus-5_10-post-merge-yamaoka: 1.131
+	gnus-5_10-pre-merge-yamaoka: 1.131
+	gnus-5_10-branch: 1.131.0.2
+	gnus-5_10-branchpoint: 1.131
+	emacs-unicode-2-pre-sync: 1.128.4.1
+	ttn-vms-21-3-stash: 1.120.4.1.0.2
+	ttn-vms-21-2-stash: 1.120.0.6
+	EMACS_21_2: 1.120
+	handa-temp-tag: 1.131
+	emacs-bidi: 1.128.0.6
+	emacs-bidi-base: 1.128
+	emacs-unicode-2: 1.128.0.4
+	emacs-unicode-2-base: 1.149
+	Boehm-GC: 1.128.0.2
+	Boehm-GC-base: 1.128
+	EMACS_21_3: 1.120.4.1
+	rmail-mbox-branch: 1.127.0.2
+	RMAIL-MBOX-BASE: 1.127
+	EMACS_PRETEST_21_2_95: 1.120.4.1
+	EMACS_PRETEST_21_2_94: 1.120.4.1
+	EMACS_PRETEST_21_2_93: 1.120.4.1
+	EMACS_PRETEST_21_2_92: 1.120.4.1
+	EMACS_PRETEST_21_2_91: 1.120.4.1
+	lexbind: 1.124.0.4
+	emacs-unicode: 1.124.0.2
+	emacs-unicode-base: 1.124
+	fx-branch-base: 1.115
+	EMACS_21_1: 1.120
+	EMACS_21_1_RC: 1.120.0.4
+	EMACS_21_1_BASE: 1.120
+	patches_21_0: 1.120.0.2
+	patches_21_0_base: 1.120
+	EMACS_PRETEST_21_0_106: 1.120
+	EMACS_PRETEST_21_0_105: 1.120
+	EMACS_PRETEST_21_0_104: 1.119
+	EMACS_20_2: 1.99
+	gerd_big: 1.118.0.8
+	gerd_int: 1.118.0.6
+	gerd_dbe: 1.118.0.4
+	gerd_defvaralias: 1.118.0.2
+	EMACS_20_4: 1.109
+	EMACS_PRETEST_21_0_103: 1.118
+	EMACS_PRETEST_21_0_102: 1.116
+	EMACS_PRETEST_21_0_101: 1.116
+	EMACS_PRETEST_21_0_100: 1.116
+	EMACS_PRETEST_21_0_99: 1.115
+	EMACS_PRETEST_21_0_98: 1.115
+	fx-branch: 1.115.0.2
+	EMACS_PRETEST_21_0_97: 1.115
+	EMACS_PRETEST_21_0_96: 1.115
+	EMACS_PRETEST_21_0_95: 1.115
+	EMACS_PRETEST_21_0_93: 1.114
+	EMACS_PRETEST_21_0_92: 1.113
+	EMACS_PRETEST_21_0_91: 1.113
+	EMACS_PRETEST_21_0_90: 1.113
+keyword substitution: kv
+total revisions: 232;	selected revisions: 232
+description:
+;;; rmailsum.el --- "RMAIL" mail reader for Emacs.
+----------------------------
+revision 1.151 (patched)
+date: 2008-05-06 07:22:28 +0000;  author: gm;  state: Exp;  lines: +4 -6;  commitid: nPdVwGEZ0V6bhS1t;
+Switch to recommended form of GPLv3 permissions notice.
+----------------------------
+revision 1.150 (patched)
+date: 2008-04-10 14:10:20 +0000;  author: monnier;  state: Exp;  lines: +1 -1;  commitid: vwbWV2GwRKWGmzYs;
+Fix up comment convention on the arch-tag lines.
+----------------------------
+revision 1.149 (patched)
+date: 2008-01-08 20:45:08 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: GLqjDoDkbCnkxEMs;
+Merge from emacs--rel--22
+
+Revision: [e-mail]/emacs--devo--0--patch-987
+----------------------------
+revision 1.148 (patched)
+date: 2007-11-27 06:57:06 +0000;  author: dann;  state: Exp;  lines: +7 -0;  commitid: 2IinMqAAxCxbjbHs;
+* progmodes/cperl-mode.el (compilation-error-regexp-alist): Pacify
+byte compiler.
+(cperl-mode): Use with-no-warnings for setting vc-header-alist.
+
+* progmodes/idlwave.el (idlwave-shell-get-path-info)
+(idlwave-shell-temp-file, idlwave-shell-is-running)
+(widget-value, comint-dynamic-complete-filename, Info-goto-node):
+* progmodes/idlw-help.el (idlwave-prepare-structure-tag-completion)
+(idlwave-all-method-classes, idlwave-all-method-keyword-classes)
+(idlwave-beginning-of-statement, idlwave-best-rinfo-assoc)
+(idlwave-class-found-in, idlwave-class-or-superclass-with-tag)
+(idlwave-completing-read, idlwave-current-routine)
+(idlwave-downcase-safe, idlwave-entry-find-keyword)
+(idlwave-expand-keyword, idlwave-find-class-definition)
+(idlwave-find-inherited-class, idlwave-find-struct-tag)
+(idlwave-get-buffer-visiting, idlwave-in-quote)
+(idlwave-make-full-name, idlwave-members-only)
+(idlwave-popup-select, idlwave-routine-source-file)
+(idlwave-routines, idlwave-sintern-class)
+(idlwave-sintern-keyword, idlwave-sintern-method)
+(idlwave-sintern-routine-or-method)
+(idlwave-substitute-link-target, idlwave-sys-dir)
+(idlwave-this-word, idlwave-what-module-find-class)
+(idlwave-where):
+* progmodes/idlw-complete-structtag.el (idlwave-shell-buffer):
+* mail/uce.el (rmail-msg-is-pruned)
+(rmail-maybe-set-message-counters, rmail-msgbeg, rmail-msgend)
+(rmail-toggle-header):
+* mail/sendmail.el (dired-view-file, dired-get-filename):
+* mail/rmailkwd.el (rmail-maybe-set-message-counters)
+(rmail-display-labels, rmail-msgbeg)
+(rmail-set-message-deleted-p, rmail-message-labels-p)
+(rmail-show-message, mail-comma-list-regexp)
+(mail-parse-comma-list):
+* mail/rmail.el (rmail-spam-filter, rmail-summary-goto-msg)
+(rmail-summary-mark-undeleted, rmail-summary-mark-deleted)
+(rfc822-addresses, mail-abbrev-make-syntax-table)
+(mail-sendmail-delimit-header, mail-header-end):
+* mail/hashcash.el (message-narrow-to-headers-or-head)
+(message-fetch-field, message-goto-eoh)
+(message-narrow-to-headers):
+* vc.el (view-mode-exit): Declare as functions.
+
+* mail/vms-pmail.el:
+* vmsproc.el:
+* vms-patch.el: Don't byte compile these files, they don't work.
+
+* Makefile.in (SOME_MACHINE_LISP): Remove VMS files, they are not
+compiled anymore.
+----------------------------
+revision 1.147 (defer)
+date: 2007-08-03 05:49:54 +0000;  author: miles;  state: Exp;  lines: +6 -4;  commitid: adBKBdPIVNlvFgss;
+Merge from emacs--rel--22
+
+Patches applied:
+
+ * emacs--rel--22  (patch 84-87)
+
+   - Update from CVS
+   - Change capitalization of VC backend names for new backends
+
[phone]  Richard Stallman  <[e-mail]>
+
+   * lisp/mail/rmailsum.el (rmail-make-summary-line): Find end of msg number
+   to update deleted flag.
+
+   * lisp/cus-edit.el (customize-apropos, customize-apropos-options)
+   (customize-apropos-faces, customize-apropos-groups): Improve prompt.
+
+   * lisp/menu-bar.el (menu-bar-help-menu): Add "About GNU" menu item.
+
+   * lisp/startup.el (fancy-splash-head, startup-echo-area-message):
+   Change message text.
+
+   * lisp/emulation/tpu-edt.el (next-line-internal): Setting deleted.
+   All callers use line-move.
+
+   * lisp/progmodes/compile.el (compilation-find-buffer): Return current
+   buffer immediately if suitable.
+   (compile, compilation-buffer-name, compilation-start): Doc fixes.
+
[phone]  Daiki Ueno  <[e-mail]>
+
+   * lisp/faces.el (face-normalize-spec): New function.
+   (frame-set-background-mode): Normalize face-spec before calling
+   face-spec-match-p.
+
[phone]  Stefan Monnier  <[e-mail]>
+
+   * lisp/server.el (server-window): Add switch-to-buffer-other-frame option.
+
[phone]  Richard Stallman  <[e-mail]>
+
+   * src/fileio.c (Fvisited_file_modtime): Use make_time.
+
+Revision: [e-mail]/emacs--devo--0--patch-844
+----------------------------
+revision 1.146 (irrelevant)
+date: 2007-07-26 05:27:14 +0000;  author: miles;  state: Exp;  lines: +1 -1;  commitid: IKTBbGNFxqtbNers;
+Merge from emacs--rel--22
+
+Patches applied:
+
+ * emacs--rel--22  (patch 70-73)
+
+   - Update from CVS
+
[phone]  Glenn Morris  <[e-mail]>
+
+   * Relicense all FSF files to GPLv3 or later.
+
+Revision: [e-mail]/emacs--devo--0--patch-828
+----------------------------
+revision 1.145 (defer)
+date: 2007-06-07 06:32:42 +0000;  author: gm;  state: Exp;  lines: +10 -0;  commitid: XUqQ8i1UYiNMJWks;
+Alfred M. Szmidt  <ams at gnu.org>  (tiny change)
+
+(rmail-summary-save-buffer): New command.
+(rmail-summary-mode-map): Add rmail-summary-save-buffer.
+----------------------------
+revision 1.144 (patched)
+date: 2007-01-21 02:59:07 +0000;  author: gm;  state: Exp;  lines: +1 -1;
+branches:  1.144.2;  1.144.4;
+Add 2007 to copyright years.
+----------------------------
+revision 1.143 (defer)
+date: 2006-03-11 16:18:20 +0000;  author: eliz;  state: Exp;  lines: +1 -1;
+(rmail-summary-next-msg): Skip deleted messages, where "D" is the
+6th character.
+----------------------------
+revision 1.142 (patched)
+date: 2006-02-06 12:31:40 +0000;  author: ttn;  state: Exp;  lines: +1 -1;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.141 (defer)
+date: 2006-01-26 17:54:01 +0000;  author: rms;  state: Exp;  lines: +2 -3;
+(rmail-make-summary-line-1): Don't set global binding of `line'.
+----------------------------
+revision 1.140 (partial/defer)
+date: 2006-01-08 15:17:45 +0000;  author: as;  state: Exp;  lines: +14 -12;
+(rmail-summary-by-topic): Use
+rmail-current-subject and rmail-current-subject-regexp.
+(rmail-summary-next-same-subject): Ditto.
+----------------------------
+revision 1.139 (applied)
+date: 2005-09-24 13:43:58 +0000;  author: rfrancoise;  state: Exp;  lines: +14 -12;
[phone]  Emilio C. Lopes  <[e-mail]>
+
+	* woman.el (woman-file-name):
+	* wid-edit.el (widget-file-prompt-value)
+	(widget-coding-system-prompt-value):
+	* w32-fns.el (set-w32-system-coding-system):
+	* vc.el (vc-version-diff, vc-annotate):
+	* textmodes/reftex-auc.el (reftex-arg-cite)
+	(reftex-arg-index-tag):
+	* textmodes/refer.el (refer-get-bib-files):
+	* textmodes/artist.el (artist-figlet-choose-font):
+	* terminal.el (terminal-emulator):
+	* replace.el (occur-read-primary-args):
+	* rect.el (string-rectangle, string-insert-rectangle):
+	* ps-print.el (ps-print-preprint):
+	* progmodes/pascal.el (pascal-goto-defun):
+	* progmodes/etags.el (visit-tags-table, visit-tags-table-buffer):
+	* progmodes/compile.el (compilation-find-file):
+	* printing.el (pr-interactive-n-up):
+	* play/animate.el (animate-birthday-present):
+	* net/rcompile.el (remote-compile):
+	* man.el (man, Man-goto-section, Man-follow-manual-reference):
+	* mail/rmailsum.el (rmail-summary-search-backward)
+	(rmail-summary-search):
+	* mail/rmailout.el (rmail-output-read-rmail-file-name)
+	(rmail-output-read-file-name):
+	* mail/rmail.el (rmail-search, rmail-search-backwards):
+	* mail/mailabbrev.el (merge-mail-abbrevs, rebuild-mail-abbrevs):
+	* locate.el (locate):
+	* international/quail.el (quail-show-keyboard-layout):
+	* international/mule.el (set-buffer-file-coding-system)
+	(revert-buffer-with-coding-system, set-file-name-coding-system)
+	(set-terminal-coding-system, set-keyboard-coding-system)
+	(set-next-selection-coding-system):
+	* international/mule-diag.el (describe-coding-system)
+	(describe-font, describe-fontset):
+	* international/mule-cmds.el (universal-coding-system-argument)
+	(search-unencodable-char, describe-input-method)
+	(set-language-environment, describe-language-environment):
+	* international/codepage.el (codepage-setup):
+	* international/code-pages.el (codepage-setup):
+	* info.el (Info-search, Info-follow-reference)
+	(Info-search-backward):
+	* emacs-lisp/advice.el (ad-read-advised-function)
+	(ad-read-advice-class, ad-clear-cache, ad-activate)
+	(ad-deactivate, ad-update, ad-unadvise, ad-read-advice-name)
+	(ad-enable-advice, ad-disable-advice, ad-remove-advice)
+	(ad-read-regexp):
+	* ediff-util.el (ediff-toggle-regexp-match):
+	* ediff-ptch.el (ediff-prompt-for-patch-file):
+	* dired-aux.el (dired-diff):
+	* diff.el (diff):
+	* cus-edit.el (custom-variable-prompt):
+	* calendar/timeclock.el (timeclock-ask-for-project):
+	* calc/calcalg3.el (calc-get-fit-variables):
+	* calc/calc-store.el (calc-edit-variable)
+	(calc-permanent-variable):
+	* vc-mcvs.el (vc-mcvs-register):
+	* shadowfile.el (shadow-define-literal-group):
+	* woman.el (woman-file-name):
+	* vc.el (vc-version-diff, vc-merge):
+	* textmodes/reftex-index.el (reftex-index-complete-tag):
+	* format.el (format-decode-buffer, format-decode-region):
+	* emulation/viper-cmd.el (viper-read-string-with-history):
+	* emacs-lisp/debug.el (cancel-debug-on-entry):
+	* emacs-lisp/checkdoc.el (checkdoc-this-string-valid-engine):
+	* ediff.el (ediff-merge-revisions)
+	(ediff-merge-revisions-with-ancestor, ediff-revision):
+	* completion.el (interactive-completion-string-reader):
+	* calc/calc-prog.el (calc-user-define-formula):
+	Follow convention for reading with the minibuffer.
+----------------------------
+revision 1.138 (applied)
+date: 2005-08-29 14:36:21 +0000;  author: lektu;  state: Exp;  lines: +2 -0;
+(msgnum): Add defvar.
+----------------------------
+revision 1.137 (applied)
+date: 2005-08-12 10:28:02 +0000;  author: eliz;  state: Exp;  lines: +19 -2;
+(rmail-summary-end-of-message): New command to go to the bottom of the mail
+message.  Added to `rmail-summary-mode-map' with key "/".
+(rmail-summary-show-message): New (internal) function for use by both
+`rmail-summary-beginning/end-of-message'.
+(rmail-summary-beginning-of-message): Changed to use
+rmail-summary-show-message.
+----------------------------
+revision 1.136 (applied)
+date: 2005-08-06 18:54:05 +0000;  author: ttn;  state: Exp;  lines: +2 -2;
+Update years in copyright notice; nfc.
+----------------------------
+revision 1.135 (irrelevant)
+date: 2005-07-04 17:46:22 +0000;  author: lute;  state: Exp;  lines: +2 -2;
+Update FSF's address.
+----------------------------
+revision 1.134 (partial/defer)
+date: 2005-07-03 16:29:14 +0000;  author: rms;  state: Exp;  lines: +21 -13;
+(rmail-summary-redo): Add defvar.
+(rmail-summary-mode-map, rmail-summary-overlay): Defvars moved up.
+(rmail-new-summary-line-count): Renamed from new-summary-line-count.
+Add defvar.
+(rmail-summary-beginning-of-message): Use with-no-warnings.
+(rmail-summary-first-message, rmail-summary-last-message): Likewise.
+----------------------------
+revision 1.133 (applied)
+date: 2005-05-26 15:17:48 +0000;  author: lute;  state: Exp;  lines: +1 -1;
+(rmail-summary-mode): Use run-mode-hooks.
+----------------------------
+revision 1.132 (defer)
+date: 2005-05-16 11:16:34 +0000;  author: lektu;  state: Exp;  lines: +12 -12;
+Replace `string-to-int' by `string-to-number'.
+----------------------------
+revision 1.131 (defer)
+date: 2003-11-01 16:37:35 +0000;  author: eliz;  state: Exp;  lines: +2 -1;
+branches:  1.131.4;
+(rmail-summary-goto-msg): Don't call itself
+recursively if the last message is deleted, thus avoiding an
+infinite loop.
+----------------------------
+revision 1.130 (defer)
+date: 2003-09-30 12:43:49 +0000;  author: rms;  state: Exp;  lines: +7 -3;
+(rmail-make-summary-line-1): Change comma after last label to a space.
+(rmail-summary-font-lock-keywords): Adapt to that change.
+----------------------------
+revision 1.129 (applied)
+date: 2003-09-01 15:45:32 +0000;  author: miles;  state: Exp;  lines: +1 -0;
+Add arch taglines
+----------------------------
+revision 1.128 (defer)
+date: 2003-04-09 01:31:31 +0000;  author: rms;  state: Exp;  lines: +46 -43;
+branches:  1.128.4;
+(rmail-make-basic-summary-line): If there's
+no From field, still try to use the To field.
+----------------------------