X-Git-Url: https://git.madduck.net/code/myrepos.git/blobdiff_plain/d977f4f0abb8e9c61e0fda75fd5684ad6e265c8e..09af48cd838965e18f3b408d931fd0c8c44a16aa:/mr

diff --git a/mr b/mr
index 8883aab..23178a5 100755
--- a/mr
+++ b/mr
@@ -627,7 +627,7 @@ sub vcs_test {
 			}
 			next;
 		}
-		my $vcs=$vcs_test =~ /(.*)_test/;
+		my ($vcs)=$vcs_test =~ /(.*)_test/;
 		$test="my_$vcs_test() {\n$config{$topdir}{$subdir}{$vcs_test}\n}\n".$test;
 		$test.="if my_$vcs_test; then echo $vcs; fi\n";
 	}