fixed: Back to Site link in asset manager points to wrong location

fixed: Some import node folders have invalid template
This commit is contained in:
Graham Knop 2008-08-19 17:36:17 +00:00
parent b02b4823ff
commit 27a76cd9a3
8 changed files with 18 additions and 0 deletions

View file

@ -1,4 +1,6 @@
7.5.21
- fixed: Back to Site link in asset manager points to wrong location
- fixed: Some import node folders have invalid template
- fixed: Scheduled workflows based on day of week run on wrong day
- improved debug messages for sql queries
- fixed: Custom library directories don't override WebGUI core modules

View file

@ -29,10 +29,25 @@ my $quiet; # this line required
my $session = start(); # this line required
# upgrade functions go here
removeUnusedImportFolder( $session );
finish($session); # this line required
#----------------------------------------------------------------------------
sub removeUnusedImportFolder {
my $session = shift;
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) {
$asset->purge;
}
}
print "Done.\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
#sub exampleFunction {

View file

@ -238,6 +238,7 @@ sub handler {
my ( $session ) = @_;
if ( $session->form->get( 'op' ) eq 'assetManager' && getCurrentAsset( $session ) ) {
$session->asset(getCurrentAsset($session));
return $session->privilege->noAccess unless getCurrentAsset( $session )->canEdit;