X-Git-Url: https://git.jankratochvil.net/?p=nethome.git;a=blobdiff_plain;f=bin%2Fcvsutil;h=72c19d5624a4b358ed523bcd99e5124757c60d92;hp=026d0cdd5523808caac6bd0a2db5f0ffc130c88b;hb=9941dd67625f104aeb2954ff1942bc7b1b0df549;hpb=41e18f02ebc9bdc924bea371e87bf9db1eb9ec87 diff --git a/bin/cvsutil b/bin/cvsutil index 026d0cd..72c19d5 100755 --- a/bin/cvsutil +++ b/bin/cvsutil @@ -167,7 +167,8 @@ sub localreaddir next if /^D$/; do { push @dir_dirs ,$1; next; } if m#^D/([^/]*)/#; next if m#^/[^/]*/-#; # deleted file: /filename/-1.1/dummy timestamp// - next if m#^/[^/]*/0/#; # new file: /filename/0/dummy timestamp// + # New file is a valid entry! + # next if m#^/[^/]*/0/#; # new file: /filename/0/dummy timestamp// do { push @dir_files,$1; next; } if m#^/([^/]*)/# ; mayfatal "File ".ENTRIES." contains invalid line \"$_\"",("noerrno"=>1); } @@ -221,7 +222,8 @@ sub localactionrm { my($filename)=@_; - chmod 0700,$filename or do { + # &chmod follows the symlinks. + -l $filename or chmod 0700,$filename or do { mayfatal "File \"$_\" cannot be chmod(2)ed" if !$!{ENOENT}; }; # '\1' for '-r':