projects
/
mkws-moved-to-github.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add font-weight:normal to selection of Gill Sans.
[mkws-moved-to-github.git]
/
test
/
bin
/
bomb.pl
diff --git
a/test/bin/bomb.pl
b/test/bin/bomb.pl
index
1592161
..
ae97859
100755
(executable)
--- a/
test/bin/bomb.pl
+++ b/
test/bin/bomb.pl
@@
-57,7
+57,7
@@
$SIG{ALRM} = sub {
my $pgid = getpgrp();
warn "Alarm handler got called after $timeout seconds\n";
my $pgid = getpgrp();
warn "Alarm handler got called after $timeout seconds\n";
- warn "Kill now the process group...\n\n";
+ warn "Kill now the process group $pgid\n\n";
# kill process group
kill "INT", -$pgid;
# kill process group
kill "INT", -$pgid;
@@
-69,7
+69,7
@@
$SIG{INT} = "IGNORE";
alarm($timeout);
system(@system) == 0
alarm($timeout);
system(@system) == 0
- or die "system @system failed: $?";
+ or die "system('@system') failed: ?='$?', !='$!', ^E='$^E'\n";
1;
1;