From 21df787c85539e149fdcf98155e37d0237105b64 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Wed, 18 May 2011 03:11:30 +0200 Subject: App::Hashl documentation --- t/29-app-hashl.t | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 't/29-app-hashl.t') diff --git a/t/29-app-hashl.t b/t/29-app-hashl.t index 608a3a2..20d0734 100644 --- a/t/29-app-hashl.t +++ b/t/29-app-hashl.t @@ -29,19 +29,18 @@ is_deeply([$hashl->files()], [], 'no files in empty db'); is_deeply([$hashl->ignored()], [], 'no ignored files in empty db'); my $test_hash = $hashl->hash_file('t/in/4'); +my ($test_size, $test_mtime) = (stat('t/in/4'))[7,9]; ok($hashl->add_file( file => 't/in/4', path => 't/in/4', - mtime => 123, - size => 4, ), 'Add new file' ); is_deeply($hashl->file('t/in/4'), { hash => $test_hash, - size => 4, - mtime => 123, + size => $test_size, + mtime => $test_mtime, }, 'hashl->file okay' ); -- cgit v1.2.3