diff options
| author | cyberbotx <cyberbotx@5417fbe8-f217-4b02-8779-1006273d7864> | 2008-12-29 09:02:03 +0000 |
|---|---|---|
| committer | cyberbotx <cyberbotx@5417fbe8-f217-4b02-8779-1006273d7864> | 2008-12-29 09:02:03 +0000 |
| commit | e0c10d684e412a71f9da9bafdde728c94ae9e8aa (patch) | |
| tree | 54516efce454ea71c6c8f9c9b0d40fb66cffec69 /run-cc.pl | |
| parent | 6a2c0a7785a3b60e57e796d7d148c25314fec9d3 (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-x | run-cc.pl | 17 |
1 files changed, 2 insertions, 15 deletions
@@ -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; |
