Changeset 878

Timestamp:

11/19/06 18:58:08 (2 years ago)

Author:

dom

Message:

Compile time fixes.

Files:

• trunk/t/74_ping_plugin.t (modified) (2 diffs)

trunk/t/74_ping_plugin.t

@@ -55 +55 @@
     ok($guide, "Made the guide OK");
 
-    my @plugins = @{ $guide->wiki->{_registered_plugins} };
+    @plugins = @{ $guide->wiki->{_registered_plugins} };
     is( scalar @plugins, 3, "Has plugin now" );
     ok( $plugins[2]->isa( "Wiki::Toolkit::Plugin" ), "Right plugin" );
@@ -64 +64 @@
     my @snames = sort keys %services;
     is( scalar @snames, 2, "Has 2 services as expected" );
-    is( @snames[0], "geourl", "Right service" );
-    is( @snames[1], "pingerati", "Right service" );
+    is( $snames[0], "geourl", "Right service" );
+    is( $snames[1], "pingerati", "Right service" );
 }