[Bps-public-commit] r10246 - bpsbuilder/BPB/lib/BPB/Backend

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Fri Jan  4 04:21:28 2008
New Revision: 10246

Modified:
   bpsbuilder/BPB/lib/BPB/Backend/SVK.pm
   bpsbuilder/BPB/lib/BPB/Backend/SVN.pm

Log:
make editor happy

Modified: bpsbuilder/BPB/lib/BPB/Backend/SVK.pm
==============================================================================
--- bpsbuilder/BPB/lib/BPB/Backend/SVK.pm	(original)
+++ bpsbuilder/BPB/lib/BPB/Backend/SVK.pm	Fri Jan  4 04:21:28 2008
@@ -191,7 +191,7 @@
 
     my $order = $self->order;
 
-    $name =~ s!^.*/(.+)/?$!$1.tar.gz!;
+    $name =~ s{^.*/(.+)/?$}{$1.tar.gz};
     $name = CPAN::DistnameInfo->new($name)->dist;
 
     unless ( grep { /^$name$/ } @$order ) {

Modified: bpsbuilder/BPB/lib/BPB/Backend/SVN.pm
==============================================================================
--- bpsbuilder/BPB/lib/BPB/Backend/SVN.pm	(original)
+++ bpsbuilder/BPB/lib/BPB/Backend/SVN.pm	Fri Jan  4 04:21:28 2008
@@ -187,7 +187,7 @@
 
     my $order = $self->order;
 
-    $name =~ s!^.*/(.+)/?$!$1.tar.gz!;
+    $name =~ s{^.*/(.+)/?$}{$1.tar.gz};
     $name = CPAN::DistnameInfo->new($name)->dist;
 
     unless ( grep { /^$name$/ } @$order ) {