oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix macro issues, missing FilePump, HASH entry. Fixes bug #11449.

Browse source
This commit is contained in:
Colin Kuskie 2010-03-01 15:01:40 -08:00
parent c0d45e0f23
commit eea83d571e
2 changed files with 27 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

26
docs/upgrades/upgrade_7.8.13-7.9.0.pl
View file

@ -31,6 +31,8 @@ my $quiet;
my $session = start();
# upgrade functions go here
removeBadMacroEntries($session);
addFilePumpMacro($session);
finish($session);
@ -44,6 +46,30 @@ finish($session);
# print "DONE!\n" unless $quiet;
#}
#----------------------------------------------------------------------------
# Describe what our function does
sub removeBadMacroEntries {
my $session = shift;
print "\tRemove bad macro entries that look like perl memory locations... " unless $quiet;
my $macros = $session->config->get('macros');
# and here's our code
foreach my $macroName (keys %{ $macros }) {
delete $macros->{$macroName} if $macroName =~ /HASH \( 0x \w+ \)/ox;
}
$session->config->set('macros', $macros);
print "DONE!\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
sub addFilePumpMacro {
my $session = shift;
print "\tAdd the FilePump macro... " unless $quiet;
# and here's our code
$session->config->addToHash('macros', 'FilePump' => 'FilePump');
print "DONE!\n" unless $quiet;
}
# -------------- DO NOT EDIT BELOW THIS LINE --------------------------------