From bae936a701bd791518bf7acff2d10eb8fb6bab54 Mon Sep 17 00:00:00 2001
From: Knut Auvor Grythe <knut@auvor.no>
Date: Tue, 31 Mar 2015 16:38:01 +0200
Subject: now featuring reduced security on ssh

---
 clients/smanagrun.pl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'clients')

diff --git a/clients/smanagrun.pl b/clients/smanagrun.pl
index a68edf8..30a702d 100755
--- a/clients/smanagrun.pl
+++ b/clients/smanagrun.pl
@@ -127,6 +127,11 @@ while (1) {
 		waitpid($ssh->{pid}, 0);
 		$sunlock->execute($switch->{sysname});
 	};
-	warn $@ if $@;
+	if ($@) {
+		warn $@;
+		$sdelay->execute($@ . ", delaying...", $switch->{sysname});
+		$sunlock->execute($switch->{sysname});
+		$dbh->commit();
+	}
 }
 
-- 
cgit v1.2.3