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

[sunnavy at bestpractical.com]

The branch, master has been updated
       via  9b8ca66d1bd31f1693082f1a23a0913c74cdd098 (commit)
      from  12cf21b336c3b5222ed18a53803fa3efb121aca4 (commit)

Summary of changes:
 lib/Shipwright/Backend/SVK.pm |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

- Log -----------------------------------------------------------------
commit 9b8ca66d1bd31f1693082f1a23a0913c74cdd098
Author: sunnavy <sunnavy at bestpractical.com>
Date:   Tue Aug 4 12:05:52 2009 +0800

    cleanup, all "svn" cmd should be replaced by $ENV{SHIPWRIGHT_SVN}

diff --git a/lib/Shipwright/Backend/SVK.pm b/lib/Shipwright/Backend/SVK.pm
index 5481e31..289b611 100644
--- a/lib/Shipwright/Backend/SVK.pm
+++ b/lib/Shipwright/Backend/SVK.pm
@@ -85,13 +85,13 @@ sub _cmd {
     elsif ( $type eq 'export' ) {
         @cmd = (
             [
-                'svn',                           'export',
+                $ENV{'SHIPWRIGHT_SVN'},                           'export',
                 $self->_svnroot . $args{path}, $args{target}
             ],
         );
     }
     elsif ( $type eq 'list' ) {
-        @cmd = [ 'svn', 'list', $self->_svnroot . $args{path} ];
+        @cmd = [ $ENV{'SHIPWRIGHT_SVN'}, 'list', $self->_svnroot . $args{path} ];
     }
     elsif ( $type eq 'import' ) {
         if ( $args{_initialize} ) {
@@ -182,7 +182,7 @@ sub _cmd {
         @cmd = [ $ENV{'SHIPWRIGHT_SVK'}, 'info', $self->repository . $args{path} ];
     }
     elsif ( $type eq 'cat' ) {
-        @cmd = [ 'svn', 'cat', $self->_svnroot . $args{path} ];
+        @cmd = [ $ENV{'SHIPWRIGHT_SVN'}, 'cat', $self->_svnroot . $args{path} ];
     }
     else {
         croak "invalid command: $type";

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