X-Git-Url: https://git.jankratochvil.net/?p=nethome.git;a=blobdiff_plain;f=bin%2Fcvsutil;h=72c19d5624a4b358ed523bcd99e5124757c60d92;hp=7aa18ecd1f3f8569f36fd9efa853fdb83dc344b1;hb=257109ce5b17e8bf1e9990564d3eef7722746c0b;hpb=bb8a3a439bbbcf92314f69225437e852c8159528 diff --git a/bin/cvsutil b/bin/cvsutil index 7aa18ec..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 0600,$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':