Support also non-CVS diff toplevel dir normalization to `./'.
authorlace <>
Thu, 10 Jul 2008 10:32:19 +0000 (10:32 +0000)
committerlace <>
Thu, 10 Jul 2008 10:32:19 +0000 (10:32 +0000)
bin/diffdecvs

index 7b65e6d..0fd5082 100755 (executable)
@@ -10,8 +10,8 @@ prog='
        $wasdiff-- if $wasdiff;
        $wasdiff=3 if /^diff -/;
        # Do not substitute already existing "./"... or "/dev/null".
-       s{^\Q---\E (?![.]?/)}{$&./} if $wasdiff==2;
-       s{^\Q+++\E (?![.]?/)}{$&./} if $wasdiff==1;
+       s{^(\Q---\E )(?:gdb-[^/]*/|[.]/)?}{$1./} if $wasdiff==2;
+       s{^(\Q+++\E )(?:gdb-[^/]*/|[.]/)?}{$1./} if $wasdiff==1;
        next if /^[?]/;
        next if /^Index:/;
        next if /^={67}$/;