diff --git a/docs/upgrades/upgrade_7.6.11-7.6.12.pl b/docs/upgrades/upgrade_7.6.11-7.6.12.pl index afbe63933..ef2103e74 100644 --- a/docs/upgrades/upgrade_7.6.11-7.6.12.pl +++ b/docs/upgrades/upgrade_7.6.11-7.6.12.pl @@ -33,6 +33,7 @@ my $session = start(); # this line required addAssetDiscoveryServiceAgain( $session ); changeMatrixAttributeIndexing( $session ); fixCollaborationGroupToEditPost( $session ); +convertLongVarcharsToText( $session ); # upgrade functions go here @@ -48,6 +49,17 @@ finish($session); # this line required # print "DONE!\n" unless $quiet; #} +#---------------------------------------------------------------------------- +sub convertLongVarcharsToText { + my $session = shift; + print "\tConverting Survey VARCHAR fields to TEXT... " unless $quiet; + $session->db->write("ALTER TABLE Survey MODIFY COLUMN exitURL TEXT"); + $session->db->write("ALTER TABLE Survey_tempReport MODIFY COLUMN sectionName TEXT"); + $session->db->write("ALTER TABLE Survey_tempReport MODIFY COLUMN questionName TEXT"); + # and here's our code + print "Done.\n" unless $quiet; +} + #---------------------------------------------------------------------------- sub addAssetDiscoveryServiceAgain { my $session = shift;