[Bps-public-commit] Shipwright branch, master, updated. 9ead5e0536b0ad726f36616ae28ec494895a6549

? sunnavy sunnavy at bestpractical.com
Wed Nov 10 06:45:31 EST 2010


The branch, master has been updated
       via  9ead5e0536b0ad726f36616ae28ec494895a6549 (commit)
      from  df5e707cd4d646730773459ff2d41742e1062c75 (commit)

Summary of changes:
 lib/Shipwright/Script/Import.pm |    8 +++-----
 1 files changed, 3 insertions(+), 5 deletions(-)

- Log -----------------------------------------------------------------
commit 9ead5e0536b0ad726f36616ae28ec494895a6549
Author: sunnavy <sunnavy at bestpractical.com>
Date:   Wed Nov 10 19:45:39 2010 +0800

    regex tweak

diff --git a/lib/Shipwright/Script/Import.pm b/lib/Shipwright/Script/Import.pm
index ffc8a3a..ec58642 100644
--- a/lib/Shipwright/Script/Import.pm
+++ b/lib/Shipwright/Script/Import.pm
@@ -178,13 +178,11 @@ sub run {
                 );
 
                 if ( my $script = $self->build_script ) {
-                    if ( $script =~ /\.pl/ ) {
-                        copy( $self->build_script,
-                            catfile( $script_dir, 'build.pl' ) );
+                    if ( $script =~ /\.pl$/ ) {
+                        copy( $script, catfile( $script_dir, 'build.pl' ) );
                     }
                     else {
-                        copy( $self->build_script,
-                            catfile( $script_dir, 'build' ) );
+                        copy( $script, catfile( $script_dir, 'build' ) );
                     }
                 }
                 else {

-----------------------------------------------------------------------



More information about the Bps-public-commit mailing list