newsticker: enable jump to virtual feeds
This commit is contained in:
parent
febb8abad4
commit
b0f439fc19
2 changed files with 10 additions and 4 deletions
|
@ -1,3 +1,8 @@
|
|||
2009-04-15 Ulf Jasper <ulf.jasper@web.de>
|
||||
|
||||
* net/newst-treeview.el (newsticker-treeview-jump): Enable virtual
|
||||
feeds.
|
||||
|
||||
2009-04-15 Dan Nicolaescu <dann@ics.uci.edu>
|
||||
|
||||
* vc-svn.el (vc-svn-after-dir-status): Fix regexp to allow for
|
||||
|
|
|
@ -7,7 +7,7 @@
|
|||
;; URL: http://www.nongnu.org/newsticker
|
||||
;; Created: 2007
|
||||
;; Keywords: News, RSS, Atom
|
||||
;; Time-stamp: "16. Februar 2009, 21:25:09 (ulf)"
|
||||
;; Time-stamp: "15. April 2009, 19:51:17 (ulf)"
|
||||
|
||||
;; ======================================================================
|
||||
|
||||
|
@ -1638,9 +1638,10 @@ Return t if a new feed was activated, nil otherwise."
|
|||
(list (let ((completion-ignore-case t))
|
||||
(completing-read
|
||||
"Jump to feed: "
|
||||
(mapcar 'car (append newsticker-url-list
|
||||
newsticker-url-list-defaults))
|
||||
nil t))))
|
||||
(append '("new" "obsolete" "immortal" "all")
|
||||
(mapcar 'car (append newsticker-url-list
|
||||
newsticker-url-list-defaults)))
|
||||
nil t))))
|
||||
(newsticker--treeview-unfold-node feed-name))
|
||||
|
||||
;; ======================================================================
|
||||
|
|
Loading…
Add table
Reference in a new issue