protect against folders already being gone

This commit is contained in:
Graham Knop 2008-08-21 20:52:30 +00:00
parent 5eee6abe1e
commit daf2651388

View file

@ -40,7 +40,7 @@ sub removeUnusedImportFolder {
print "\tRemoving legacy folders from Import node if empty... " unless $quiet;
for my $assetId (qw(lK9-YMfZ4mpc-Me-UydrFg j3P_Vvsy0OtvUJZRXC55Nw XP2W66c8vtDVpxN50Fiwww JJ-SZb9z2l_N46A0AWW7KA Cn2TOyQH3qqnQrWDrsGrxg sMuqO3Ynl6Lyn5fa2SsGmQ NYr6iP4pQaPRYqEYMryv4w)) {
my $asset = WebGUI::Asset->new($session, $assetId);
if ($asset->getChildCount == 0) {
if ($asset && $asset->getChildCount == 0) {
$asset->purge;
}
}