130 |
(1- (point)) |
(1- (point)) |
131 |
(1- (+ (point) 4096))))) |
(1- (+ (point) 4096))))) |
132 |
(setq short-read (< (nth 1 pair) 4096))))) |
(setq short-read (< (nth 1 pair) 4096))))) |
133 |
(cond (short-read nil) |
(cond ((re-search-forward charset-regexp nil t) (match-string 1)) |
134 |
((re-search-forward charset-regexp nil t) (match-string 1)) |
(short-read nil) |
135 |
;; We've found the first msgid; maybe, only a part of the msgstr |
;; We've found the first msgid; maybe, only a part of the msgstr |
136 |
;; value was loaded. Load the next 1024 bytes; if charset still |
;; value was loaded. Load the next 1024 bytes; if charset still |
137 |
;; isn't available, give up. |
;; isn't available, give up. |