Mercurial > emacs
changeset 102071:e25fb73b6868
* net/newst-treeview.el (newsticker--treeview-load): Remove bogus `if'.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Tue, 17 Feb 2009 14:58:15 +0000 |
| parents | 68388ae40468 |
| children | 1867fcb8720e |
| files | lisp/ChangeLog lisp/net/newst-treeview.el |
| diffstat | 2 files changed, 7 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Tue Feb 17 14:27:28 2009 +0000 +++ b/lisp/ChangeLog Tue Feb 17 14:58:15 2009 +0000 @@ -1,5 +1,7 @@ 2009-02-17 Juanma Barranquero <lekktu@gmail.com> + * net/newst-treeview.el (newsticker--treeview-load): Remove bogus `if'. + * progmodes/cc-menus.el (cc-imenu-objc-function): Doc fix. 2009-02-17 Miles Bader <miles@gnu.org>
--- a/lisp/net/newst-treeview.el Tue Feb 17 14:27:28 2009 +0000 +++ b/lisp/net/newst-treeview.el Tue Feb 17 14:58:15 2009 +0000 @@ -1261,9 +1261,9 @@ (concat newsticker-dir "/groups"))) (buf (and (file-exists-p filename) (find-file-noselect filename)))) - (if (and (file-exists-p newsticker-groups-filename) - (y-or-n-p (format "Delete old newsticker groups file? ")) - (delete-file newsticker-groups-filename))) + (and (file-exists-p newsticker-groups-filename) + (y-or-n-p (format "Delete old newsticker groups file? ")) + (delete-file newsticker-groups-filename)) (when buf (set-buffer buf) (goto-char (point-min)) @@ -1551,7 +1551,7 @@ (widget-apply-action node))))) (defun newsticker--treeview-first-feed () - "Jump to the depth-first feed in the newsticker-groups tree." + "Jump to the depth-first feed in the newsticker-groups tree." (newsticker-treeview-jump (car (reverse (newsticker--group-get-feeds newsticker-groups t))))) @@ -1603,7 +1603,7 @@ (not (eq new cur))) nil)) nil))) - + (defun newsticker-treeview-next-page () "Scroll item buffer." (interactive)