Parent Directory | Revision Log | Patch
revision 14 by dpavlin, Mon Jul 9 13:04:25 2007 UTC | revision 15 by dpavlin, Mon Jul 9 13:33:13 2007 UTC | |
---|---|---|
# | Line 255 sub x_truncate { | Line 255 sub x_truncate { |
255 | rename $path, $no_gz || confess "can't rename $path -> $no_gz: $!"; | rename $path, $no_gz || confess "can't rename $path -> $no_gz: $!"; |
256 | } | } |
257 | warn "## truncate( $file $size ) $path [", -s $path, "]\n"; | warn "## truncate( $file $size ) $path [", -s $path, "]\n"; |
258 | $pending->{$file}->{write}++; | |
259 | return $rv; | return $rv; |
260 | } | } |
261 | sub x_utime { return utime($_[1],$_[2],fixup($_[0])) ? 0:-$!; } | sub x_utime { return utime($_[1],$_[2],fixup($_[0])) ? 0:-$!; } |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |