Mercurial > emacs

changeset 51890:9b78d0da1a28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(po-find-charset): White space at the start of the Content-Type field body is non-mandatory.
author Juanma Barranquero <lekktu@gmail.com>
date Sun, 13 Jul 2003 17:15:12 +0000
parents 5b772e335afe
children 62a53410dbd8
files lisp/textmodes/po.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/po.el	Sun Jul 13 00:20:39 2003 +0000
+++ b/lisp/textmodes/po.el	Sun Jul 13 17:15:12 2003 +0000
@@ -42,7 +42,7 @@
 (defun po-find-charset (filename)
   "Return PO charset value for FILENAME."
   (let ((charset-regexp
-	 "^\"Content-Type: text/plain;[ \t]*charset=\\(.*\\)\\\\n\"")
+	 "^\"Content-Type:[ \t]*text/plain;[ \t]*charset=\\(.*\\)\\\\n\"")
 	(short-read nil))
     ;; Try the first 4096 bytes.  In case we cannot find the charset value
     ;; within the first 4096 bytes (the PO file might start with a long