From d7e11726bbd2f8ce5fb6d756fd9bad9a709d988f Mon Sep 17 00:00:00 2001
From: Oliver Tappe
Date: Sat, 15 Mar 2008 18:35:27 +0000
Subject: * intermediate checking for new desktop plugin (successor of
 displaymanager   with extended scope) - does not work yet, so please do not
 use!

git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1634 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 lib/OpenSLX/Basics.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'lib')

diff --git a/lib/OpenSLX/Basics.pm b/lib/OpenSLX/Basics.pm
index 5f9a57b4..e5a57b15 100644
--- a/lib/OpenSLX/Basics.pm
+++ b/lib/OpenSLX/Basics.pm
@@ -313,7 +313,11 @@ sub callInSubprocess
 
 		# child...
 		# ...execute the given function and exit:
-		&$childFunc();
+		my $ok = eval { $childFunc->(); 1 };
+		if (!$ok) {
+			print STDERR "*** $@";
+			exit 5;
+		}
 		exit 0;
 	}
 
-- 
cgit v1.2.3-55-g7522