/[VRac]/VRac.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /VRac.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 157 by dpavlin, Sun Aug 5 17:46:47 2007 UTC revision 158 by dpavlin, Sun Aug 5 17:59:29 2007 UTC
# Line 210  sub append_to_file { Line 210  sub append_to_file {
210    
211          my $expected = $size + $len;          my $expected = $size + $len;
212          if ( $pos != $expected ) {          if ( $pos != $expected ) {
213                  carp "BUG: file grows too big got $pos, expected $expected !";                  cluck "BUG: file grows too big got $pos, expected $expected !";
214                  truncate $fh, $expected;                  truncate $fh, $expected;
215          }          }
216    
Legend:
Removed from v.157  
changed lines
  Added in v.158
  ViewVC Help
Powered by ViewVC 1.1.26