From 43f607c3ba9b94109fdadf304c2a22087731f540 Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Tue, 13 Apr 2010 14:01:00 +0000
Subject: fixed Batchmode

git-svn-id: https://svn.helsinki.at/rhimport/trunk@49 7c65635b-ec39-4f67-a626-873dbafdd612

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';
-- 
cgit v0.10.2