Obsolete/dnsmanagerv1
Archived
3
0
Fork 0
Code

suppression de $self

Browse Source
This commit is contained in:
Philippe Pittoli 2014-05-08 14:18:26 +02:00
parent 6d4cc2e0ca
commit feedeac9f9
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
app/zone/nsdc_interface.pm
View File

@ -58,7 +58,7 @@ sub addzone_sec {
} }
sub _scp_get { sub _scp_get {
my ($self, $user, $host, $port, $src, $dest) = @_; my ($user, $host, $port, $src, $dest) = @_;
my $co = $user . '@' . $host . ':' . $port; my $co = $user . '@' . $host . ':' . $port;
my $ssh = Net::OpenSSH->new($co); my $ssh = Net::OpenSSH->new($co);
@ -66,7 +66,7 @@ sub _scp_get {
} }
sub _scp_put { sub _scp_put {
my ($self, $user, $host, $port, $src, $dest) = @_; my ($user, $host, $port, $src, $dest) = @_;
my $co = $user . '@' . $host . ':' . $port; my $co = $user . '@' . $host . ':' . $port;
my $ssh = Net::OpenSSH->new($co); my $ssh = Net::OpenSSH->new($co);