Parent Directory | Revision Log | Patch
revision 15 by dpavlin, Mon Jul 9 13:33:13 2007 UTC | revision 16 by dpavlin, Mon Jul 9 13:45:45 2007 UTC | |
---|---|---|
# | Line 67 sub file { | Line 67 sub file { |
67 | } | } |
68 | } else { | } else { |
69 | ok( -e "$from/$path", "on disk $from/$path" ); | ok( -e "$from/$path", "on disk $from/$path" ); |
70 | my $curr_size = -s "$from/$path"; | diag "$op curr_size: $orig_size size: $size"; |
71 | diag "$op curr_size: $curr_size size: $size"; | $size += $orig_size if ( $op eq '>>' ); |
$size += $curr_size if ( $op eq '>>' ); | ||
72 | cmp_ok( -s "$from/$path", '==', $size, "$from/$path = $size bytes" ); | cmp_ok( -s "$from/$path", '==', $size, "$from/$path = $size bytes" ); |
73 | } | } |
74 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |