[Bps-public-commit] r17790 - in Shipwright/trunk: lib/Shipwright/Script

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Fri Jan 16 11:51:48 2009
New Revision: 17790

Modified:
   Shipwright/trunk/   (props changed)
   Shipwright/trunk/lib/Shipwright/Script/Build.pm

Log:
 r18834 at sunnavys-mb:  sunnavy | 2009-01-16 21:19:12 +0800
 bit improvement


Modified: Shipwright/trunk/lib/Shipwright/Script/Build.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Build.pm	(original)
+++ Shipwright/trunk/lib/Shipwright/Script/Build.pm	Fri Jan 16 11:51:48 2009
@@ -90,7 +90,7 @@
     );
     my $branches = $shipwright->backend->branches() || {};
     for my $name ( keys %{ $self->branches } ) {
-        die 'no branch name ' . $self->branches->{$name} . " for $name"
+        confess 'no branch name ' . $self->branches->{$name} . " for $name"
           unless grep { $_ eq $self->branches->{$name} }
               @{ $branches->{$name} || [] };
     }