X-Git-Url: https://git.madduck.net/code/myrepos.git/blobdiff_plain/a348fce28351c555810039dc1d7c7ebf9d35d9b2..e1004f484b97cc90e1f052088950092f5e01023b:/mr?ds=inline 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;