X-Git-Url: https://git.madduck.net/code/myrepos.git/blobdiff_plain/552a9560c671c36ca527da4c4a51369633e3960f..7ec67608cca6d2ca8095c2ebf0585e36431056ea:/mr diff --git a/mr b/mr index e76887e..883f4fb 100755 --- a/mr +++ b/mr @@ -451,7 +451,7 @@ sub findcommand { #{{{ sub action { #{{{ my ($action, $dir, $topdir, $subdir) = @_; - + $ENV{MR_CONFIG}=$configfiles{$topdir}; my $lib=exists $config{$topdir}{$subdir}{lib} ? $config{$topdir}{$subdir}{lib}."\n" : ""; @@ -546,8 +546,10 @@ sub action { #{{{ if (-e "$ENV{HOME}/.mrlog" && $action ne 'remember') { # recreate original command line to # remember, and avoid recursing - @ARGV=('-n', $action, @ARGV); + my @orig=@ARGV; + @ARGV=('-n', $action, @orig); action("remember", $dir, $topdir, $subdir); + @ARGV=@orig; } } elsif ($ret != 0) {