fixed bug 730052

This commit is contained in:
JT Smith 2003-05-10 22:25:07 +00:00
parent 67a8dbd4ee
commit 64c7a9da73

View file

@ -82,6 +82,12 @@ sub new {
bless $self, $class;
}
#-------------------------------------------------------------------
sub purge {
WebGUI::SQL->write("delete from FileManager_file where wobjectId=".$_[0]->get("wobjectId"));
$_[0]->SUPER::purge();
}
#-------------------------------------------------------------------
sub uiLevel {
return 4;