X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fnnnil.el;h=08a097dc291e7d462d08f36b4d994c4139600330;hb=9b741e050b400987d68ff761c6cc3276c932839c;hp=aa02a84dfa806c844cac219b3892cf6d8ad1a339;hpb=e09bbe24852ac35057931bae1b58acaa5b6cf502;p=elisp%2Fgnus.git-

diff --git a/lisp/nnnil.el b/lisp/nnnil.el
index aa02a84..08a097d 100644
--- a/lisp/nnnil.el
+++ b/lisp/nnnil.el
@@ -20,9 +20,9 @@
 
 ;;; Commentary:
 
-;; nnnil is a Gnus backend that provides no groups or articles.  It's
-;; useful ass a primary select method when you want all your real
-;; select methods to be secondary or foreign.
+;; nnnil is a Gnus backend that provides no groups or articles.  It's useful
+;; as a primary select method when you want all your real select methods to
+;; be secondary or foreign.
 
 ;;; Code:
 
@@ -32,6 +32,9 @@
 (defvar nnnil-status-string "")
 
 (defun nnnil-retrieve-headers (articles &optional group server fetch-old)
+  (save-excursion
+    (set-buffer nntp-server-buffer)
+    (erase-buffer))
   'nov)
 
 (defun nnnil-open-server (server &optional definitions)
@@ -66,6 +69,9 @@
   t)
 
 (defun nnnil-request-list (&optional server)
+  (save-excursion
+    (set-buffer nntp-server-buffer)
+    (erase-buffer))
   t)
 
 (defun nnnil-request-post (&optional server)