oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add deleteFile tests to Image.t

Browse source
This commit is contained in:
Colin Kuskie 2007-07-23 18:14:40 +00:00
parent 1d8c55dc58
commit 86d92d68a8
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
t/Storage/Image.t
View file

@ -173,19 +173,19 @@ ok(-e $imageCopy->getPath('thumb-square.png'), 'copy also copied the thumbnail')
# #
#################################################### ####################################################
$imageCopy->deleteFile('square.png'); is($imageCopy->deleteFile('square.png'), 1, 'deleteFile only reports 1 file deleted');
cmp_bag( cmp_bag(
$imageCopy->getFiles(), #Must call SUPER because getFiles ignores thumb files. $imageCopy->getFiles(),
[qw()], [qw()],
'delete deleted the file', 'delete deleted the file',
); );
ok(!-e $imageCopy->getPath('thumb-square.png'), 'deleteFile also deleted the thumbnail'); ok(!-e $imageCopy->getPath('thumb-square.png'), 'deleteFile also deleted the thumbnail');
is($imageCopy->deleteFile('../../'), undef, 'deleteFile in Storage::Image also returns undef if you try to delete a file outside of this storage object');
TODO: { TODO: {
local $TODO = "Methods that need to be tested"; local $TODO = "Methods that need to be tested";
ok(0, 'copy also copies thumbnails');
ok(0, 'deleteFile also deletes thumbnails');
ok(0, 'getThumbnailUrl'); ok(0, 'getThumbnailUrl');
ok(0, 'resize'); ok(0, 'resize');
} }