andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(nnheader-insert-head): Handle the case that the

Browse source 
length of header is changed because of code conversion.
This commit is contained in:
Karl Heuer 1997-02-20 05:38:08 +00:00
parent d5d99b8075
commit 50ef36f521
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/nnheader.el
View file

@ -302,8 +302,8 @@ on your system, you could say something like:
(let ((beg 0)
format-alist
(chop 1024))
(while (and (eq chop (nth 1 (insert-file-contents
file nil beg (incf beg chop))))
(while (and (not (zerop (nth 1 (insert-file-contents
file nil beg (incf beg chop)))))
(prog1 (not (search-forward "\n\n" nil t))
(goto-char (point-max)))
(or (null nnheader-max-head-length)