* rmail.el (rmail-unix-mail-delimiter): Not all time zone names

end with "T". Accept any sequence of three or four alphabetic characters.
1992-12-24 06:01:02 +00:00
parent 59f3e9a221
commit 13a5fb226a
1 changed files with 1 additions and 1 deletions
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -110,7 +110,7 @@ Called with region narrowed to unformatted header.")
 ;;; that knows the exact ordering of the \\( \\) subexpressions.
 (defvar rmail-unix-mail-delimiter
  (let ((time-zone-regexp
-	 (concat "\\([A-Z]?[A-Z][A-Z]T\\( DST\\)?"
+	 (concat "\\([A-Z]?[A-Z][A-Z][A-Z]\\( DST\\)?"
 		 "\\|[-+]?[0-9][0-9][0-9][0-9]"
 		 "\\|"
 		 "\\) *")))