t/db_dependent/UploadedFile.t

   1 #!/usr/bin/perl
   2 #
   3
   4 # A simple test for UploadedFile
   5 # only ->new is covered
   6
   7 use strict;
   8 use warnings;
   9
  10 use Test::More tests => 2;
  11
  12 BEGIN {
  13         use_ok('C4::UploadedFile');
  14 }
  15
  16 ok(my $file = C4::UploadedFile->new());