aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rwxr-xr-xtools/killev11
2 files changed, 16 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index c37bfb6470..32bcc58d0b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
2001-10-23 Chris Toshok <toshok@ximian.com>
+ * tools/killev: and add a way to get some more spew about the
+ commands we're executing.
+
+2001-10-23 Chris Toshok <toshok@ximian.com>
+
* tools/killev: use eq instead of ==.
2001-10-23 Christopher James Lahey <clahey@ximian.com>
diff --git a/tools/killev b/tools/killev
index b92d0303f6..0745d013e0 100755
--- a/tools/killev
+++ b/tools/killev
@@ -1,5 +1,8 @@
#!/usr/bin/perl
+# set to 1 if you want some extra spew
+$debug=0;
+
# Interfaces of CORBA servers that need to die.
@idls = ("IDL:GNOME/Evolution/ShellComponent:1.0",
"IDL:GNOME/Evolution/CalFactory:1.0",
@@ -38,9 +41,17 @@ sub kill_exe {
printf ("killing $exe_name\n");
$redirect = "2> /dev/null";
+
+ print "$killcmd -9 $exe_name\n" if ($debug);
`$killcmd -9 $exe_name $redirect`;
+
+ print "$killcmd -9 $lt_name\n" if ($debug);
`$killcmd -9 $lt_name $redirect`;
+
+ print "$killcmd -9 $sub_exe_name\n" if ($debug);
`$killcmd -9 $sub_exe_name $redirect`;
+
+ print "$killcmd -9 $sub_lt_name\n" if ($debug);
`$killcmd -9 $sub_lt_name $redirect`;
}