some upgrade script fixes

docs/changelog/7.x.x.txt

@@ -15,6 +15,8 @@
  - fix: Bug in "Article with Files"
  - fix: SQLReport pagination retains op= parameter
  - 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

docs/upgrades/upgrade_7.1.3-7.2.0.pl

@@ -249,6 +249,7 @@ sub reorderSurveyCollateral {
 	$sth1->execute();
 	while (my ($assetId) = $sth1->array) {  ##Iterate over all surveys
 		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');
 		$sth2->execute([$Survey_Id]);
 		while (my ($questionId) = $sth2->array) { ##iterate over all questions in the survey

lib/WebGUI/AdSpace.pm

@@ -15,6 +15,7 @@ package WebGUI::AdSpace;
 =cut
 
 use strict;
+use WebGUI::AdSpace::Ad;
 
 =head1 NAME