diff --git a/docs/changelog/6.x.x.txt b/docs/changelog/6.x.x.txt index bfea6da72..54963f48e 100644 --- a/docs/changelog/6.x.x.txt +++ b/docs/changelog/6.x.x.txt @@ -1,6 +1,7 @@ 6.99.1 - Bugfixes on dashboard to fix template errors. - Bug fixes to make WebGUI work with the WRE demo system. + - Fixed a typo in the activities in the config file. 6.99.0 - Added a workflow system. diff --git a/docs/upgrades/upgrade_6.99.0-6.99.1.pl b/docs/upgrades/upgrade_6.99.0-6.99.1.pl index 336c067dc..4de764bc8 100644 --- a/docs/upgrades/upgrade_6.99.0-6.99.1.pl +++ b/docs/upgrades/upgrade_6.99.0-6.99.1.pl @@ -20,19 +20,24 @@ my $quiet; # this line required my $session = start(); # this line required -# upgrade functions go here +fixTypos(); finish($session); # this line required -##------------------------------------------------- -#sub exampleFunction { -# my $session = shift; -# print "\tWe're doing some stuff here that you should know about.\n" unless ($quiet); -# # and here's our code -#} - - +#------------------------------------------------- +sub fixTypos { + my $session = shift; + print "\tFixing typos.\n" unless ($quiet); + my $activities = $session->config->get("workflowActivities"); + my $versionTag = $activities->{"WebGUI::VersionTag"}; + my @newStuff = ("WebGUI::Workflow::Activity::ExportVersionTagToHtml"); + foreach my $value (@{$versionTag}) { + push(@newStuff, $value); + } + $activities->{"WebGUI::VersionTag"} = \@newStuff; + $session->config->set("workflowActivities",$activities); +} # ---- DO NOT EDIT BELOW THIS LINE ----