X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-bcklg.el;h=458bd2df80d1b675d24cfefb457188090168f9f2;hb=9a60f093f45ad3169be0d0cc4a2bf75ba599aca8;hp=3fca805c93c40585d7a1dacf4e007bcf195c5c5f;hpb=1cc092fba18930eabb2e3e97f209badffe0dd109;p=gnus diff --git a/lisp/gnus-bcklg.el b/lisp/gnus-bcklg.el index 3fca805c9..458bd2df8 100644 --- a/lisp/gnus-bcklg.el +++ b/lisp/gnus-bcklg.el @@ -1,5 +1,6 @@ ;;; gnus-bcklg.el --- backlog functions for Gnus -;; Copyright (C) 1996, 1997, 1998, 1999, 2000 Free Software Foundation, Inc. +;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2003 +;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; Keywords: news @@ -55,8 +56,9 @@ (defun gnus-backlog-shutdown () "Clear all backlog variables and buffers." + (interactive) (when (get-buffer gnus-backlog-buffer) - (kill-buffer gnus-backlog-buffer)) + (gnus-kill-buffer gnus-backlog-buffer)) (setq gnus-backlog-hashtb nil gnus-backlog-articles nil))