some upgrade script fixes
This commit is contained in:
parent
8e4d52166d
commit
e1b583a935
3 changed files with 4 additions and 0 deletions
|
|
@ -15,6 +15,8 @@
|
||||||
- fix: Bug in "Article with Files"
|
- fix: Bug in "Article with Files"
|
||||||
- fix: SQLReport pagination retains op= parameter
|
- fix: SQLReport pagination retains op= parameter
|
||||||
- fix: Invalid MIME type set for images
|
- fix: Invalid MIME type set for images
|
||||||
|
- Fixed a problem with the adspace upgrade in 7.2.0
|
||||||
|
- Fixed a problem with the survey upgrade in 7.2.0
|
||||||
|
|
||||||
|
|
||||||
7.2.0
|
7.2.0
|
||||||
|
|
|
||||||
|
|
@ -249,6 +249,7 @@ sub reorderSurveyCollateral {
|
||||||
$sth1->execute();
|
$sth1->execute();
|
||||||
while (my ($assetId) = $sth1->array) { ##Iterate over all surveys
|
while (my ($assetId) = $sth1->array) { ##Iterate over all surveys
|
||||||
my $survey = WebGUI::Asset->new($session, $assetId, 'WebGUI::Asset::Wobject::Survey');
|
my $survey = WebGUI::Asset->new($session, $assetId, 'WebGUI::Asset::Wobject::Survey');
|
||||||
|
next unless defined $survey; # skip pending surveys
|
||||||
my $Survey_Id = $survey->get('Survey_id');
|
my $Survey_Id = $survey->get('Survey_id');
|
||||||
$sth2->execute([$Survey_Id]);
|
$sth2->execute([$Survey_Id]);
|
||||||
while (my ($questionId) = $sth2->array) { ##iterate over all questions in the survey
|
while (my ($questionId) = $sth2->array) { ##iterate over all questions in the survey
|
||||||
|
|
|
||||||
|
|
@ -15,6 +15,7 @@ package WebGUI::AdSpace;
|
||||||
=cut
|
=cut
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
use WebGUI::AdSpace::Ad;
|
||||||
|
|
||||||
=head1 NAME
|
=head1 NAME
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue