* Fix a bug caused by a stupid typo.

[code/myrepos.git] / mr

diff --git a/mr b/mr
index 95a7fe86a77535968990064cdad62c573a1a3227..e41264c12e9214027dcb8d9b06b6ec413e95e273 100755 (executable)
--- a/mr
+++ b/mr
@@ -362,7 +362,7 @@ foreach my $topdir (sort keys %config) {
                my $d=$directory;
                $dir.="/" unless $dir=~/\/$/;
                $d.="/" unless $d=~/\/$/;
                my $d=$directory;
                $dir.="/" unless $dir=~/\/$/;
                $d.="/" unless $d=~/\/$/;

-               next if $dir ne $directory && $dir !~ /^\Q$directory\E/;
+               next if $dir ne $d && $dir !~ /^\Q$d\E/;

                push @repos, [$dir, $topdir, $subdir];
        }
 }
                push @repos, [$dir, $topdir, $subdir];
        }
 }