# HG changeset patch
# User Ulf Jasper <ulf.jasper@web.de>
# Date 1234209948 0
# Node ID a4aa4e04bc1142317897ea164a40d99c2f90489f
# Parent  3d527c23c151e433de2e26a8fdc2b17fa158d543
newsticker: kill groups buffer after saving/loading.

diff -r 3d527c23c151 -r a4aa4e04bc11 lisp/ChangeLog
--- a/lisp/ChangeLog	Mon Feb 09 17:26:21 2009 +0000
+++ b/lisp/ChangeLog	Mon Feb 09 20:05:48 2009 +0000
@@ -1,3 +1,9 @@
+2009-02-09  Ulf Jasper  <ulf.jasper@web.de>
+
+	* net/newst-treeview.el (newsticker-treeview-save)
+	(newsticker--treeview-load): Kill groups buffer after
+	saving/loading.
+
 2009-02-09  Tassilo Horn  <tassilo@member.fsf.org>
 
 	* doc-view.el (doc-view-scroll-up-or-next-page)
diff -r 3d527c23c151 -r a4aa4e04bc11 lisp/net/newst-treeview.el
--- a/lisp/net/newst-treeview.el	Mon Feb 09 17:26:21 2009 +0000
+++ b/lisp/net/newst-treeview.el	Mon Feb 09 20:05:48 2009 +0000
@@ -7,7 +7,7 @@
 ;; URL:         http://www.nongnu.org/newsticker
 ;; Created:     2007
 ;; Keywords:    News, RSS, Atom
-;; Time-stamp:  "7. Februar 2009, 11:46:00 (ulf)"
+;; Time-stamp:  "8. Februar 2009, 19:24:05 (ulf)"
 
 ;; ======================================================================
 
@@ -1246,7 +1246,8 @@
         (erase-buffer)
         (insert ";; -*- coding: utf-8 -*-\n")
         (insert (prin1-to-string newsticker-groups))
-        (save-buffer)))))
+        (save-buffer)
+        (kill-buffer)))))
 
 (defun newsticker--treeview-load ()
   "Load treeview settings."
@@ -1267,7 +1268,8 @@
           (setq newsticker-groups (read buf))
         (error
          (message "Error while reading newsticker groups file!")
-         (setq newsticker-groups nil))))))
+         (setq newsticker-groups nil)))
+      (kill-buffer buf))))
 
 
 (defun newsticker-treeview-scroll-item ()