Koha/t/db_dependent/UploadedFile.t
2011-12-07 16:37:31 +01:00

16 lines
219 B
Perl
Executable file

#!/usr/bin/perl
#
# A simple test for UploadedFile
# only ->new is covered
use strict;
use warnings;
use Test::More tests => 2;
BEGIN {
use_ok('C4::UploadedFile');
}
ok(my $file = C4::UploadedFile->new());