Changeset 380 for wiki-toolkit-plugin-categoriser/trunk/t/categoriser.t

Timestamp:

03/06/07 11:00:35 (5 years ago)

Author:

kake

Message:

Fix bug - ->categories was picking up out-of-date categories.

Files:

• wiki-toolkit-plugin-categoriser/trunk/t/categoriser.t (modified) (2 diffs)

wiki-toolkit-plugin-categoriser/trunk/t/categoriser.t

@@ -4 +4 @@
 
 my $iterator = Wiki::Toolkit::TestLib->new_wiki_maker;
-plan tests => ( 1 + $iterator->number * 6 );
+plan tests => ( 1 + $iterator->number * 7 );
 
 use_ok( "Wiki::Toolkit::Plugin::Categoriser" );
@@ -42 +42 @@
     is_deeply( [ sort @categories ], [ "Pub Food", "Pubs" ],
                "...->categories returns all categories" );
+
+    # Make sure we only look at current category data.
+    my %node_data = $wiki->retrieve_node( "Calthorpe Arms" );
+    $wiki->write_node( "Calthorpe Arms",
+                       "Oh noes, they stopped doing food!",
+                       $node_data{checksum},
+                       { category => [ "Pubs" ] } )
+      or die "Can't write node";
+    @categories = $categoriser->categories( node => "Calthorpe Arms" );
+    is_deeply( \@categories, [ "Pubs" ],
+               "->categories ignores out-of-date data" );
 }