aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorUlf Jasper2011-10-30 16:21:37 +0100
committerUlf Jasper2011-10-30 16:21:37 +0100
commitdba0634a93dce8370b7a07727d6ad54ffa695872 (patch)
treeff7a943866d0a101f24ee2c6d966bfa71e6720bf /test
parent3d8daefefaf3bfd73ca4d8a363b044ec66a45e3a (diff)
downloademacs-dba0634a93dce8370b7a07727d6ad54ffa695872.tar.gz
emacs-dba0634a93dce8370b7a07727d6ad54ffa695872.zip
newsticker: Clean up newsticker--group-manage-orphan-feeds
2011-10-30 Ulf Jasper <ulf.jasper@web.de> * net/newst-treeview.el: Remove "Time-stamp". (newsticker--group-manage-orphan-feeds): Do not call newsticker--treeview-tree-update. (newsticker-treeview-update, newsticker-treeview): Call newsticker--treeview-tree-update if necessary. 2011-10-30 Ulf Jasper <ulf.jasper@web.de> * automated/newsticker-tests.el (newsticker--group-manage-orphan-feeds): Removed fsetting of newsticker--treeview-tree-update.
Diffstat (limited to 'test')
-rw-r--r--test/ChangeLog6
-rw-r--r--test/automated/newsticker-tests.el8
2 files changed, 7 insertions, 7 deletions
diff --git a/test/ChangeLog b/test/ChangeLog
index dcdef6399e4..de4fb270440 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,9 @@
12011-10-30 Ulf Jasper <ulf.jasper@web.de>
2
3 * automated/newsticker-tests.el
4 (newsticker--group-manage-orphan-feeds): Removed fsetting of
5 newsticker--treeview-tree-update.
6
12011-10-29 Ulf Jasper <ulf.jasper@web.de> 72011-10-29 Ulf Jasper <ulf.jasper@web.de>
2 8
3 * automated/newsticker-tests.el 9 * automated/newsticker-tests.el
diff --git a/test/automated/newsticker-tests.el b/test/automated/newsticker-tests.el
index ba7fe20786b..76f4345da55 100644
--- a/test/automated/newsticker-tests.el
+++ b/test/automated/newsticker-tests.el
@@ -138,14 +138,8 @@ Apply to INPUT and compare with EXPECTED."
138Signals an error if something goes wrong." 138Signals an error if something goes wrong."
139 (let ((newsticker-groups '("Feeds")) 139 (let ((newsticker-groups '("Feeds"))
140 (newsticker-url-list-defaults nil) 140 (newsticker-url-list-defaults nil)
141 (newsticker-url-list '(("feed1") ("feed2") ("feed3"))) 141 (newsticker-url-list '(("feed1") ("feed2") ("feed3"))))
142 t-nttvtu)
143 ;; prevent updating the treeview as it does not exist during fully
144 ;; automated tests
145 (fset 't-nttvtu (symbol-function 'newsticker--treeview-tree-update))
146 (fset 'newsticker--treeview-tree-update (lambda() nil))
147 (newsticker--group-manage-orphan-feeds) 142 (newsticker--group-manage-orphan-feeds)
148 (fset 'newsticker--treeview-tree-update (symbol-function 't-nttvtu))
149 (should (equal '("Feeds" "feed3" "feed2" "feed1") 143 (should (equal '("Feeds" "feed3" "feed2" "feed1")
150 newsticker-groups)))) 144 newsticker-groups))))
151 145