[Bps-public-commit] r10290 - bpsbuilder/BPB/lib/BPB/Source

sunnavy at bestpractical.com sunnavy at bestpractical.com
Fri Jan 11 10:05:42 EST 2008


Author: sunnavy
Date: Fri Jan 11 10:05:42 2008
New Revision: 10290

Modified:
   bpsbuilder/BPB/lib/BPB/Source/FTP.pm
   bpsbuilder/BPB/lib/BPB/Source/HTTP.pm

Log:
updated _cmd returns

Modified: bpsbuilder/BPB/lib/BPB/Source/FTP.pm
==============================================================================
--- bpsbuilder/BPB/lib/BPB/Source/FTP.pm	(original)
+++ bpsbuilder/BPB/lib/BPB/Source/FTP.pm	Fri Jan 11 10:05:42 2008
@@ -34,7 +34,7 @@
         my $src_dir = $self->download_directory;
         mkdir $src_dir unless -e $src_dir;
         $self->source( File::Spec->catfile( $src_dir, $file ) );
-        return join ' ', 'wget', $source, '-O', $self->source;
+        return ['wget', $source, '-O', $self->source];
     }
     else {
         croak "invalid source: $source";

Modified: bpsbuilder/BPB/lib/BPB/Source/HTTP.pm
==============================================================================
--- bpsbuilder/BPB/lib/BPB/Source/HTTP.pm	(original)
+++ bpsbuilder/BPB/lib/BPB/Source/HTTP.pm	Fri Jan 11 10:05:42 2008
@@ -34,7 +34,7 @@
         my $src_dir = $self->download_directory;
         mkdir $src_dir unless -e $src_dir;
         $self->source( File::Spec->catfile( $src_dir, $file ) );
-        return join ' ', 'wget', $source, '-O', $self->source;
+        return ['wget', $source, '-O', $self->source];
     }
     else {
         croak "invalid source: $source";



More information about the Bps-public-commit mailing list