From: Joey Hess Date: Fri, 26 Oct 2007 06:58:52 +0000 (-0400) Subject: a few more tweaks X-Git-Url: https://git.madduck.net/code/myrepos.git/commitdiff_plain/e1004f484b97cc90e1f052088950092f5e01023b?ds=inline;hp=a348fce28351c555810039dc1d7c7ebf9d35d9b2 a few more tweaks --- diff --git a/mr b/mr index aefbb4c..bc73d40 100755 --- a/mr +++ b/mr @@ -296,7 +296,8 @@ use warnings; use strict; use Getopt::Long; use Cwd qw(getcwd abs_path); -use POSIX "WNOHANG"; + +# things that can happen when mr runs a command use constant { OK => 0, FAILED => 1, @@ -304,6 +305,7 @@ use constant { ABORT => 3, }; +# configurables my $config_overridden=0; my $verbose=0; my $stats=0; @@ -312,6 +314,7 @@ my $no_chdir=0; my $jobs=1; my $directory=getcwd(); +# globals :-( my %config; my %configfiles; my %knownactions;