[Rt-commit] r2553 - in experiments/Bamboo: . ex/trivial/t

[jesse at bestpractical.com]

Author: jesse
Date: Fri Apr  1 04:19:15 2005
New Revision: 2553

Modified:
   experiments/Bamboo/   (props changed)
   experiments/Bamboo/ex/trivial/t/2facade.t
Log:
 r10906 at hualien:  jesse | 2005-04-01 17:14:23 +0800
 * Facade fixes


Modified: experiments/Bamboo/ex/trivial/t/2facade.t
==============================================================================
--- experiments/Bamboo/ex/trivial/t/2facade.t	(original)
+++ experiments/Bamboo/ex/trivial/t/2facade.t	Fri Apr  1 04:19:15 2005
@@ -11,15 +11,16 @@
 foreach my $method qw(value set increment ) {
     can_ok($counter, $method);
 }
+$counter->call_method(set => 0);
 
-is ($counter->call('value'),0);
-$counter->call('increment');
+is ($counter->call_method('value'),0);
+$counter->call_method('increment');
 
-is($counter->call('value'),1);
+is($counter->call_method('value'),1);
 
-$counter->call(set => 5);
+$counter->call_method(set => 5);
 
-is($counter->call('value'),5);
-$counter->call('increment');
+is($counter->call_method('value'),5);
+$counter->call_method('increment');
 
-is($counter->call('value'),6);
+is($counter->call_method('value'),6);