Storage now prunes empty directories when delete is called.
Add use WebGUI::Form::Hidden to Form::File
This commit is contained in:
parent
e136fb5b4e
commit
f413c029a2
4 changed files with 26 additions and 2 deletions
10
t/Storage.t
10
t/Storage.t
|
|
@ -11,6 +11,7 @@
|
|||
use FindBin;
|
||||
use strict;
|
||||
use lib "$FindBin::Bin/lib";
|
||||
our $todo;
|
||||
|
||||
use WebGUI::Test;
|
||||
use WebGUI::Session;
|
||||
|
|
@ -18,7 +19,7 @@ use WebGUI::Storage;
|
|||
|
||||
use Test::More;
|
||||
|
||||
plan tests => 8; # increment this value for each test you create
|
||||
plan tests => 9; # increment this value for each test you create
|
||||
|
||||
my $session = WebGUI::Test->session;
|
||||
|
||||
|
|
@ -48,6 +49,13 @@ $storage1->delete;
|
|||
|
||||
ok( !(-e $storageDir1), "Storage location deleted");
|
||||
|
||||
undef $storage1;
|
||||
|
||||
TODO: {
|
||||
local $TODO = "Tests to make later";
|
||||
ok(0, 'Create object with 1 character GUID');
|
||||
}
|
||||
|
||||
END {
|
||||
ref $storage1 eq "WebGUI::Storage" and $storage1->delete;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue