X-Git-Url: https://git.madduck.net/code/myrepos.git/blobdiff_plain/adc607b0b5563afe596fdfa73347ea1cb9f1da49..d9b82cdd522cbd05dbffa5b72037415407bc46f6:/mr diff --git a/mr b/mr index f725318..e29e367 100755 --- a/mr +++ b/mr @@ -39,7 +39,7 @@ working directory. Or, if you are in a subdirectory of a repository that contains no other registered repositories, it will stay in that directory, and work on only that repository, -The predefined commands should be fairly familiar to users of any revision +These predefined commands should be fairly familiar to users of any revision control system: =over 4 @@ -74,6 +74,12 @@ Show a diff of uncommitted changes. Show the commit log. +=back + +These commands are also available: + +=over 4 + =item list (or ls) List the repositories that mr will act on. @@ -527,8 +533,10 @@ sub loadconfig { #{{{ close $in; my $section; + my $line=0; while (@lines) { $_=shift @lines; + $line++; chomp; next if /^\s*\#/ || /^\s*$/; if (/^\[([^\]]*)\]\s*$/) { @@ -541,6 +549,7 @@ sub loadconfig { #{{{ # continued value while (@lines && $lines[0]=~/^\s(.+)/) { shift(@lines); + $line++; $value.="\n$1"; chomp $value; } @@ -572,7 +581,7 @@ sub loadconfig { #{{{ } } else { - die "$f line $.: parse error\n"; + die "$f line $line: parse error\n"; } } @@ -806,4 +815,5 @@ config = ed = echo "A horse is a horse, of course, of course.." T = echo "I pity the fool." +right = echo "Not found." #}}}