[Bps-public-commit] r12259 -

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Mon May 12 12:06:21 2008
New Revision: 12259

Modified:
   /   (props changed)
   Shipwright/trunk/t/10.flags.t

Log:
 r12274 at sunnavys-mb:  sunnavy | 2008-05-12 23:07:14 +0800
 rename dist arg to name for flags.t


Modified: Shipwright/trunk/t/10.flags.t
==============================================================================
--- Shipwright/trunk/t/10.flags.t	(original)
+++ Shipwright/trunk/t/10.flags.t	Mon May 12 12:06:21 2008
@@ -19,7 +19,7 @@
         log_level => 'FATAL',
     );
 
-    test_flags( shipwright => $shipwright, dist => 'foo' );
+    test_flags( shipwright => $shipwright, name => 'foo' );
 
 }
 
@@ -34,26 +34,26 @@
         log_level => 'FATAL',
     );
 
-    test_flags( shipwright => $shipwright, dist => 'foo' );
+    test_flags( shipwright => $shipwright, name => 'foo' );
 
 }
 
 sub test_flags {
     my %args = @_;
     my $shipwright = $args{shipwright};
-    my $dist = $args{dist};
+    my $name = $args{name};
 
     # init
     $shipwright->backend->initialize();
 
-    my $flags = $shipwright->backend->flags( dist => 'hello' );
+    my $flags = $shipwright->backend->flags( name => 'hello' );
     is_deeply( $flags, [], 'initial flags are []' );
 
-    $shipwright->backend->flags( dist => 'hello', flags => [ 'foo', 'bar' ] );
-    $flags = $shipwright->backend->flags( dist => 'hello' );
+    $shipwright->backend->flags( name => 'hello', flags => [ 'foo', 'bar' ] );
+    $flags = $shipwright->backend->flags( name => 'hello' );
     is_deeply( $flags, [ 'foo', 'bar' ], "set flags to ['foo', 'bar']" );
 
-    $shipwright->backend->flags( dist => 'hello', flags => [] );
-    $flags = $shipwright->backend->flags( dist => 'hello' );
+    $shipwright->backend->flags( name => 'hello', flags => [] );
+    $flags = $shipwright->backend->flags( name => 'hello' );
     is_deeply( $flags, [], "set flags to []" );
 }