X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fnnnil.el;h=5c5e3c1af91367bf0e6f0aafee23396eea810621;hb=b58d62328adf02b341b460a98819a54a0d629b60;hp=08a097dc291e7d462d08f36b4d994c4139600330;hpb=afae98bbfe7278fb7e42a26eb9a720befa97c3c3;p=gnus diff --git a/lisp/nnnil.el b/lisp/nnnil.el index 08a097dc2..5c5e3c1af 100644 --- a/lisp/nnnil.el +++ b/lisp/nnnil.el @@ -1,11 +1,14 @@ ;;; nnnil.el --- empty backend for Gnus -;; Public domain. + +;; This file is in the public domain. ;; Author: Paul Jarc +;; This file is part of GNU Emacs. + ;; GNU Emacs is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by -;; the Free Software Foundation; either version 2, or (at your option) +;; the Free Software Foundation; either version 3, or (at your option) ;; any later version. ;; GNU Emacs is distributed in the hope that it will be useful, @@ -15,8 +18,8 @@ ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. +;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +;; Boston, MA 02110-1301, USA. ;;; Commentary: @@ -32,8 +35,7 @@ (defvar nnnil-status-string "") (defun nnnil-retrieve-headers (articles &optional group server fetch-old) - (save-excursion - (set-buffer nntp-server-buffer) + (with-current-buffer nntp-server-buffer (erase-buffer)) 'nov) @@ -69,8 +71,7 @@ t) (defun nnnil-request-list (&optional server) - (save-excursion - (set-buffer nntp-server-buffer) + (with-current-buffer nntp-server-buffer (erase-buffer)) t) @@ -79,3 +80,5 @@ nil) (provide 'nnnil) + +;;; arch-tag: a982a1a3-bc5e-4fb1-a233-d7657a3e3257