Storage now prunes empty directories when delete is called.

Add use WebGUI::Form::Hidden to Form::File
This commit is contained in:
Colin Kuskie 2006-05-19 21:48:10 +00:00
parent e136fb5b4e
commit f413c029a2
4 changed files with 26 additions and 2 deletions

View file

@ -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;
}