[Bps-public-commit] r17821 - in Shipwright/trunk: lib/Shipwright/Backend

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Sun Jan 18 07:59:30 2009
New Revision: 17821

Modified:
   Shipwright/trunk/   (props changed)
   Shipwright/trunk/lib/Shipwright/Backend/Base.pm

Log:
 r18893 at sunnavys-mb:  sunnavy | 2009-01-18 19:37:23 +0800
 do not record branch info for cpan dists since they only have one


Modified: Shipwright/trunk/lib/Shipwright/Backend/Base.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Backend/Base.pm	(original)
+++ Shipwright/trunk/lib/Shipwright/Backend/Base.pm	Sun Jan 18 07:59:30 2009
@@ -168,6 +168,7 @@
                         $self->branches($branches);
                     }
                     elsif (
+                            $name !~ /^cpan-/ && 
                         !(
                             $branches->{$name} && grep { $args{as} eq $_ }
                             @{ $branches->{$name} }