diff options
| author | Gnus developers <ding@gnus.org> | 2010-11-23 22:24:15 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-11-23 22:24:15 +0000 |
| commit | 094ae2abf32ae1bab203c181d42a777c773d65bc (patch) | |
| tree | c31c9a6645b55766537888ceab8ee6b618f4d2c5 /lisp/gnus/nnspool.el | |
| parent | f8ab8c1f816bac2eebb86581bc50cd1434effe50 (diff) | |
| download | emacs-094ae2abf32ae1bab203c181d42a777c773d65bc.tar.gz | |
Merge changes made in Gnus trunk.
nnheader.el (nnheader-parse-head): Bug fix. Properly position point when parsing headers.
nnspool.el (nnspool-insert-nov-head): Bug fix. Make sure point is positioned properly when parsing headers.
shr-color.el (shr-color->hexadecimal): Add support for color names.
color-lab.el (boundp): Bind float-pi for Emacs < 23.3.
shr.el (shr-insert-color-overlay): Split stuff like "#444444 !important" to find the real colour.
Diffstat (limited to 'lisp/gnus/nnspool.el')
| -rw-r--r-- | lisp/gnus/nnspool.el | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/lisp/gnus/nnspool.el b/lisp/gnus/nnspool.el index 35987277b3d..1916c1ac9ad 100644 --- a/lisp/gnus/nnspool.el +++ b/lisp/gnus/nnspool.el @@ -399,15 +399,16 @@ there.") "Read the head of ARTICLE, convert to NOV headers, and insert." (save-excursion (let ((cur (current-buffer)) - buf) + buf) (setq buf (nnheader-set-temp-buffer " *nnspool head*")) (when (nnheader-insert-head - (nnspool-article-pathname nnspool-current-group article)) - (nnheader-insert-article-line article) - (let ((headers (nnheader-parse-head))) - (set-buffer cur) - (goto-char (point-max)) - (nnheader-insert-nov headers))) + (nnspool-article-pathname nnspool-current-group article)) + (nnheader-insert-article-line article) + (goto-char (point-min)) + (let ((headers (nnheader-parse-head))) + (set-buffer cur) + (goto-char (point-max)) + (nnheader-insert-nov headers))) (kill-buffer buf)))) (defun nnspool-sift-nov-with-sed (articles file) |