changeset 43952:bd36495e6ade

(po-find-charset): Search for Charset= header even if we've read less than 4KB.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 16 Mar 2002 16:13:06 +0000
parents 717a9c1f7807
children 48147096f050
files lisp/textmodes/po.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/po.el	Sat Mar 16 12:08:49 2002 +0000
+++ b/lisp/textmodes/po.el	Sat Mar 16 16:13:06 2002 +0000
@@ -130,8 +130,8 @@
 						    (1- (point))
 						    (1- (+ (point) 4096)))))
 	  (setq short-read (< (nth 1 pair) 4096)))))
-    (cond (short-read nil)
-	  ((re-search-forward charset-regexp nil t) (match-string 1))
+    (cond ((re-search-forward charset-regexp nil t) (match-string 1))
+	  (short-read nil)
 	  ;; We've found the first msgid; maybe, only a part of the msgstr
 	  ;; value was loaded.  Load the next 1024 bytes; if charset still
 	  ;; isn't available, give up.