X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fnnslashdot.el;h=4f8e6f6b77a7faf0ceeac9c16a81d42d7471fa59;hb=d0e319b544eb439c3afd135775d6deaebdea3b49;hp=554afb7499ddbea58b512792312844d294697926;hpb=4305c2ea86b2e1d044bfb8b98e5558504bc09781;p=elisp%2Fgnus.git- diff --git a/lisp/nnslashdot.el b/lisp/nnslashdot.el index 554afb7..4f8e6f6 100644 --- a/lisp/nnslashdot.el +++ b/lisp/nnslashdot.el @@ -201,8 +201,8 @@ (set-buffer nntp-server-buffer) (erase-buffer) (mm-with-unibyte-current-buffer - (dolist (header nnslashdot-headers) - (nnheader-insert-nov (cdr header))))) + (dolist (header nnslashdot-headers) + (nnheader-insert-nov (cdr header))))) 'nov)) (deffoo nnslashdot-sane-retrieve-headers (articles group) @@ -248,7 +248,7 @@ t) (goto-char point) (while (re-search-forward - "<\\(b\\|H4\\)>\\([^<]+\\).*score:\\([^)]+\\))" + "<\\(b\\|H4\\)>\\([^<]+\\).*score:\\([^)]+\\))" nil t) (setq article (string-to-number (match-string 1)) subject (match-string 3)