fixed Batchmode

1 files changed, 2 insertions, 2 deletions

diff --git a/rhimport.pm b/rhimport.pm
index 35f9f53..7bc36cc 100644
--- a/rhimport.pm
+++ b/rhimport.pm
@@ -31,7 +31,7 @@ use File::Spec;
 
 my $ssh_host = "airplay";
 my $ssh_user = "rhimport";
-my $ssh_key_file = "~/.rhimport/import.key";
+my $ssh_key_file = "$ENV{'HOME'}/.rhimport/import.key";
 my $ssh_dir = "/programm/.rhimport";
 my $rdimport_wrapper = "/usr/local/bin/dropbox_newfile.pl";
 
@@ -209,7 +209,7 @@ sub scp_put_file
 sub ssh_exec_command 
 {
   my ($command) = @_;
-  my @cmd = ( 'ssh' , '-q', '-o', 'BatchMode', '-i', $ssh_key_file, "$ssh_user\@$ssh_host" , $command );
+  my @cmd = ( 'ssh' , '-q', '-o', 'BatchMode=yes', '-i', $ssh_key_file, "$ssh_user\@$ssh_host" , $command );
   my ($reader, $writer, $error ) = ( new IO::Handle, new IO::Handle, new IO::Handle );
   $writer->autoflush(1);
   local $SIG{CHLD} = 'DEFAULT';