[Bps-public-commit] r13316 - in Shipwright/trunk: . share/bin
sunnavy at bestpractical.com
sunnavy at bestpractical.com
Sat Jun 14 09:38:23 EDT 2008
Author: sunnavy
Date: Sat Jun 14 09:38:21 2008
New Revision: 13316
Modified:
Shipwright/trunk/ (props changed)
Shipwright/trunk/lib/Shipwright/Build.pm
Shipwright/trunk/share/bin/shipwright-builder
Log:
r13399 at sunnavys-mb: sunnavy | 2008-06-14 07:17:48 +0800
fixed an order buy
Modified: Shipwright/trunk/lib/Shipwright/Build.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Build.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Build.pm Sat Jun 14 09:38:21 2008
@@ -126,7 +126,9 @@
else {
@$order =
grep {
- ( $flags->{$_} ? $self->flags->{$_} : 1 )
+ ( $flags->{$_}
+ ? ( grep { $self->flags->{$_} } @{ $flags->{$_} } )
+ : 1 )
&& !$self->skip->{$_}
} @$order;
}
Modified: Shipwright/trunk/share/bin/shipwright-builder
==============================================================================
--- Shipwright/trunk/share/bin/shipwright-builder (original)
+++ Shipwright/trunk/share/bin/shipwright-builder Sat Jun 14 09:38:21 2008
@@ -88,6 +88,7 @@
map { $_ => 1 } split /\s*,\s*/, $args{flags} || ''
};
+
$args{with} = { map { split /=/ } split /\s*,\s*/, $args{with} || '' };
if ( $args{only} ) {
@@ -119,10 +120,13 @@
}
else {
@$order =
- grep { ( $flags->{$_} ? $args{flags}{$_} : 1 ) && !$args{skip}->{$_} }
- @$order;
+ grep {
+ ( $flags->{$_} ? ( grep { $args{flags}{$_} } @{ $flags->{$_} } ) : 1 )
+ && !$args{skip}->{$_}
+ } @$order;
}
+
my $log;
if ( $args{'only-test'} ) {
More information about the Bps-public-commit
mailing list