summaryrefslogtreecommitdiff
path: root/run-cc.pl
diff options
context:
space:
mode:
authorcyberbotx <cyberbotx@5417fbe8-f217-4b02-8779-1006273d7864>2008-12-29 09:02:03 +0000
committercyberbotx <cyberbotx@5417fbe8-f217-4b02-8779-1006273d7864>2008-12-29 09:02:03 +0000
commite0c10d684e412a71f9da9bafdde728c94ae9e8aa (patch)
tree54516efce454ea71c6c8f9c9b0d40fb66cffec69 /run-cc.pl
parent6a2c0a7785a3b60e57e796d7d148c25314fec9d3 (diff)
Reverting my last 2 commits in an attempt to fix my own screwball mistake.
git-svn-id: http://anope.svn.sourceforge.net/svnroot/anope/trunk@1873 5417fbe8-f217-4b02-8779-1006273d7864
Diffstat (limited to 'run-cc.pl')
-rwxr-xr-xrun-cc.pl17
1 files changed, 2 insertions, 15 deletions
diff --git a/run-cc.pl b/run-cc.pl
index e7311c398..6bd3e5fb6 100755
--- a/run-cc.pl
+++ b/run-cc.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/env perl
+#!/usr/bin/perl
### THIS IS DESIGNED TO BE RUN BY MAKE! DO NOT RUN FROM THE SHELL (because it MIGHT sigterm the shell)! ###
@@ -16,16 +16,7 @@ use POSIX ();
# The subs are passed the message, and anything the regex captured.
-my $flag = shift(@ARGV);
-my $quiet = 0;
-my $cc;
-if ($flag eq "-q") {
- $quiet = 1;
- $cc = shift(@ARGV);
-}
-else {
- $cc = $flag;
-}
+my $cc = shift(@ARGV);
my $showncmdline = 0;
@@ -160,10 +151,6 @@ die "Cannot fork to start $cc! $!\n" unless defined($pid);
if ($pid) {
- if ($quiet == 0) {
- printf "\t\e[1;32m%-20s\e[0m%s\n", $action . ":", $name unless $name eq "";
- }
-
my $fail = 0;
# Parent - Close child-side pipes.
close $w_stderr;