X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=SCP.pm;h=5054d555889f81c36e563dc9cba139c1c18b679b;hb=8547d9d587841c70f11f57ce0f2968ea1e0511ae;hp=0e41e3ddbade83172208fa09b18d1f640ca53c36;hpb=133f45e1e269fd8f6b585789a9af810154510479;p=Net-SCP.git

diff --git a/SCP.pm b/SCP.pm
index 0e41e3d..5054d55 100644
--- a/SCP.pm
+++ b/SCP.pm
@@ -12,7 +12,7 @@ use IPC::Open3;
 
 @ISA = qw(Exporter);
 @EXPORT_OK = qw( scp iscp );
-$VERSION = '0.06';
+$VERSION = '0.07';
 
 $scp = "scp";
 
@@ -203,7 +203,7 @@ sub get {
   $local ||= basename($remote);
   my $source = $self->{'host'}. ":$remote";
   $source = $self->{'user'}. '@'. $source if $self->{'user'};
-  scp($source,$local);
+  $self->scp($source,$local);
 }
 
 =item mkdir DIRECTORY
@@ -289,7 +289,7 @@ sub put {
   my $dest = $self->{'host'}. ":$remote";
   $dest = $self->{'user'}. '@'. $dest if $self->{'user'};
   warn "scp $local $dest\n";
-  scp($local, $dest);
+  $self->scp($local, $dest);
 }
 
 =item binary