From feedeac9f9140f514ac92bbdfce0b97d00214025 Mon Sep 17 00:00:00 2001
From: Philippe Pittoli <philippe.pittoli@etu.unistra.fr>
Date: Thu, 8 May 2014 14:18:26 +0200
Subject: [PATCH] suppression de $self

---
 app/zone/nsdc_interface.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/app/zone/nsdc_interface.pm b/app/zone/nsdc_interface.pm
index 384eecf..36ab283 100644
--- a/app/zone/nsdc_interface.pm
+++ b/app/zone/nsdc_interface.pm
@@ -58,7 +58,7 @@ sub addzone_sec {
 }
 
 sub _scp_get {
-    my ($self, $user, $host, $port, $src, $dest) = @_;
+    my ($user, $host, $port, $src, $dest) = @_;
 
     my $co = $user . '@' . $host . ':' . $port;
     my $ssh = Net::OpenSSH->new($co);
@@ -66,7 +66,7 @@ sub _scp_get {
 }
 
 sub _scp_put {
-    my ($self, $user, $host, $port, $src, $dest) = @_;
+    my ($user, $host, $port, $src, $dest) = @_;
 
     my $co = $user . '@' . $host . ':' . $port;
     my $ssh = Net::OpenSSH->new($co);