/[pxelator]/lib/PXElator/t/file.t
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 /lib/PXElator/t/file.t

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

revision 271 by dpavlin, Wed Aug 19 22:48:54 2009 UTC revision 277 by dpavlin, Thu Aug 20 19:00:13 2009 UTC
# Line 4  use warnings; Line 4  use warnings;
4  use strict;  use strict;
5  use autodie;  use autodie;
6    
7  use Test::More tests => 10;  use Test::More tests => 11;
8  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
9    
10  use_ok 'file';  use_ok 'file';
# Line 21  ok( file::change( $file, 'test' => 'foob Line 21  ok( file::change( $file, 'test' => 'foob
21  cmp_ok( -s $file, '>', $size, 'size bigger' );  cmp_ok( -s $file, '>', $size, 'size bigger' );
22  ok( ! file::change( $file, 'test' => 'foobar' ), 'change again' );  ok( ! file::change( $file, 'test' => 'foobar' ), 'change again' );
23    
24    ok( file::replace( $file, 'replaced content' ), 'replace' );
25    
26  ok( unlink($file), 'unlink' );  ok( unlink($file), 'unlink' );
Legend:
Removed from v.271  
changed lines
  Added in v.277
  ViewVC Help
Powered by ViewVC 1.1.26