newsticker: Fixed bug#9763

2011-10-29  Ulf Jasper  <ulf.jasper@web.de>

	* trunk/test/automated/newsticker-tests.el
	(newsticker--group-manage-orphan-feeds): Prevent updating
	newsticker treeview. Fixed bug#9763.

diff --git a/test/ChangeLog b/test/ChangeLog
index 396273b..354acf7 100644 (file)
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,9 @@
+2011-10-29  Ulf Jasper  <ulf.jasper@web.de>
+
+       * trunk/test/automated/newsticker-tests.el
+       (newsticker--group-manage-orphan-feeds): Prevent updating
+       newsticker treeview. Fixed bug#9763.
+
 2011-10-20  Glenn Morris  <rgm@gnu.org>
 
        * automated/vc-bzr.el (vc-bzr-test-bug9781): New test.

diff --git a/test/automated/newsticker-tests.el b/test/automated/newsticker-tests.el
index 76f4345..8b94cf8 100644 (file)
--- a/test/automated/newsticker-tests.el
+++ b/test/automated/newsticker-tests.el
@@ -139,7 +139,10 @@ Signals an error if something goes wrong."
   (let ((newsticker-groups '("Feeds"))
         (newsticker-url-list-defaults nil)
         (newsticker-url-list '(("feed1") ("feed2") ("feed3"))))
-    (newsticker--group-manage-orphan-feeds)
+    ;; prevent updating the treeview as it does not exist during fully
+    ;; automated tests
+    (flet ((newsticker--treeview-tree-update nil nil))
+      (newsticker--group-manage-orphan-feeds))
     (should (equal '("Feeds" "feed3" "feed2" "feed1")
                    newsticker-groups))))