diff --git a/docs/upgrades/upgrade_7.7.3-7.7.4.pl b/docs/upgrades/upgrade_7.7.3-7.7.4.pl index f0317b8f5..9d4222d9c 100644 --- a/docs/upgrades/upgrade_7.7.3-7.7.4.pl +++ b/docs/upgrades/upgrade_7.7.3-7.7.4.pl @@ -33,8 +33,17 @@ my $session = start(); # this line required # upgrade functions go here updateSurveyQuestionTypes($session); extendSchedulerFields($session); +allMaintenanceSingleton($session); finish($session); # this line required +#---------------------------------------------------------------------------- +sub allMaintenanceSingleton { + my $session = shift; + print "\tMaking all maintenance workflows singletons." unless $quiet; + $session->db->write("update Workflow set mode='singleton' where workflowId in ('pbworkflow000000000001','pbworkflow000000000002','pbworkflow000000000004','AuthLDAPworkflow000001')"); + print "DONE!\n" unless $quiet; +} + #---------------------------------------------------------------------------- sub extendSchedulerFields { my $session = shift;