procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* net/newst-treeview.el (newsticker--treeview-load): Remove bogus `if'.

Browse source
This commit is contained in:
Juanma Barranquero 2009-02-17 14:58:15 +00:00
parent bb4a52db9f
commit 1227224193
2 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/ChangeLog
View file

@ -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>

10
lisp/net/newst-treeview.el
View file

@ -1261,9 +1261,9 @@ Note: does not update the layout."
(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 @@ is activated."
(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 @@ Return t if a new feed was activated, nil otherwise."
(not (eq new cur)))
nil))
nil)))
(defun newsticker-treeview-next-page ()
"Scroll item buffer."
(interactive)