newsticker: Take care of nil value for `newsticker-groups-filename'.

* lisp/net/newst-treeview.el (newsticker--treeview-load): Take care of
nil value for `newsticker-groups-filename'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 772e0a752dbfac53add68cbb158a0c5edda9b368..3037012660950f5ed712b51ded3027a8d0c565d4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-11-28  Ulf Jasper  <ulf.jasper@web.de>
+
+       * net/newst-treeview.el (newsticker--treeview-load): Take care of
+       nil value for `newsticker-groups-filename'.
+
 2014-11-28  Daiki Ueno  <ueno@gnu.org>
 
        * epa.el (epa-sign-file, epa-encrypt-file, epa-decrypt-region)

diff --git a/lisp/net/newst-treeview.el b/lisp/net/newst-treeview.el
index 94661922cab3531f8ab4c6c57a9b67cdf4c7e6f5..30015f499ef1687c93b597f31ffc211dc39b73fb 100644 (file)
--- a/lisp/net/newst-treeview.el
+++ b/lisp/net/newst-treeview.el
@@ -1275,7 +1275,8 @@ Note: does not update the layout."
               (concat newsticker-dir "/groups")))
          (buf (and (file-exists-p filename)
                    (find-file-noselect filename))))
-    (and (file-exists-p newsticker-groups-filename)
+    (and newsticker-groups-filename
+         (file-exists-p newsticker-groups-filename)
         (y-or-n-p (format
                     (concat "Delete the file \"%s\",\nto which the obsolete "
                             "variable `newsticker-groups-filename' points ? ")