diff options
| author | Ulf Jasper | 2014-11-28 16:27:34 +0100 |
|---|---|---|
| committer | Ulf Jasper | 2014-11-28 16:27:34 +0100 |
| commit | d36439ca667bbdc7b89b5aa6e82d52a3cd2ded46 (patch) | |
| tree | c5183ffb9d4a5a72ea0dc345e47f6136ad673d88 | |
| parent | f33ec1f5293c701ce489a8e3982b5b984400b578 (diff) | |
| download | emacs-d36439ca667bbdc7b89b5aa6e82d52a3cd2ded46.tar.gz emacs-d36439ca667bbdc7b89b5aa6e82d52a3cd2ded46.zip | |
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'.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/net/newst-treeview.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 772e0a752db..30370126609 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2014-11-28 Ulf Jasper <ulf.jasper@web.de> | ||
| 2 | |||
| 3 | * net/newst-treeview.el (newsticker--treeview-load): Take care of | ||
| 4 | nil value for `newsticker-groups-filename'. | ||
| 5 | |||
| 1 | 2014-11-28 Daiki Ueno <ueno@gnu.org> | 6 | 2014-11-28 Daiki Ueno <ueno@gnu.org> |
| 2 | 7 | ||
| 3 | * epa.el (epa-sign-file, epa-encrypt-file, epa-decrypt-region) | 8 | * 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 94661922cab..30015f499ef 100644 --- a/lisp/net/newst-treeview.el +++ b/lisp/net/newst-treeview.el | |||
| @@ -1275,7 +1275,8 @@ Note: does not update the layout." | |||
| 1275 | (concat newsticker-dir "/groups"))) | 1275 | (concat newsticker-dir "/groups"))) |
| 1276 | (buf (and (file-exists-p filename) | 1276 | (buf (and (file-exists-p filename) |
| 1277 | (find-file-noselect filename)))) | 1277 | (find-file-noselect filename)))) |
| 1278 | (and (file-exists-p newsticker-groups-filename) | 1278 | (and newsticker-groups-filename |
| 1279 | (file-exists-p newsticker-groups-filename) | ||
| 1279 | (y-or-n-p (format | 1280 | (y-or-n-p (format |
| 1280 | (concat "Delete the file \"%s\",\nto which the obsolete " | 1281 | (concat "Delete the file \"%s\",\nto which the obsolete " |
| 1281 | "variable `newsticker-groups-filename' points ? ") | 1282 | "variable `newsticker-groups-filename' points ? ") |