From 8cfc00b622680f6c7b653959be49fbd35e3af71b Mon Sep 17 00:00:00 2001
From: etienne
Date: Mon, 15 Mar 2004 13:27:24 +0000
Subject: *** empty log message ***

---
 FugueConfig.pm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

(limited to 'FugueConfig.pm')

diff --git a/FugueConfig.pm b/FugueConfig.pm
index 806e19d..b1391ff 100644
--- a/FugueConfig.pm
+++ b/FugueConfig.pm
@@ -118,10 +118,14 @@ sub launchAgent {
 
 # launch a given command (not an ivy agent) on a given host
 sub launchCommand {
+    
     my ($type, $host, $command, $options) = @_;
     my @options = @$options if ref($options) eq 'ARRAY';
     my $command_opt = $command.' '.join(' ', @options);
     my $pid = fork;
+    warn ("*** FugueConfig::launchCommand WARNING: Could not fork!\n"), return
+	unless defined $pid;
+    
     if ($pid) {
 	# parent
 	print "*** FugueConfig::launchCommand INFO: $host: launching command ".
@@ -141,7 +145,7 @@ sub launchCommand {
 	}
     }
     
-    
 } # end launchCommand
 
-1
+
+1;
-- 
cgit v1.1