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

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Thu Aug 14 04:31:52 2008
New Revision: 15149

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

Log:
 r15710 at sunnavys-mb:  sunnavy | 2008-08-14 16:19:28 +0800
 only remove the last name if it is a shipwright source


Modified: Shipwright/trunk/lib/Shipwright/Script/List.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/List.pm	(original)
+++ Shipwright/trunk/lib/Shipwright/Script/List.pm	Thu Aug 14 04:31:52 2008
@@ -124,8 +124,9 @@
 
 # XXX TODO we need a better latest_version for shipwright source
 # using the source shipwright repo's whole version seems lame
-        $args{url} =~ s/^shipwright://;
-        $args{url} =~ s!/[^/]+$!!;
+        if ( $args{url} =~ s/^shipwright:// ) {
+            $args{url} =~ s!/[^/]+$!!;
+        }
 
         # has url, meaning svn or svk
         if ( $args{url} =~ /^svn[:+]/ ) {