Warn the user if upgradeState is set but not current, and WebGUI::Middleware::Maintenance is going to block everything because of it.
This commit is contained in:
parent
d6f66b0245
commit
cd66af7855
1 changed files with 10 additions and 0 deletions
|
|
@ -35,6 +35,16 @@ pod2usage() if $configFile eq "";
|
||||||
my $session = WebGUI::Session->open($configFile);
|
my $session = WebGUI::Session->open($configFile);
|
||||||
$session->setting->remove('specialState');
|
$session->setting->remove('specialState');
|
||||||
$session->setting->add('specialState','upgrading') unless $stop;
|
$session->setting->add('specialState','upgrading') unless $stop;
|
||||||
|
|
||||||
|
my $upgradeState = $session->setting->get('upgradeState');
|
||||||
|
if( $upgradeState eq WebGUI->VERSION ) {
|
||||||
|
$session->setting->remove('upgradeState');
|
||||||
|
}
|
||||||
|
elsif( $upgradeState ) {
|
||||||
|
print "Warning! WebGUI will continue to show the maintenance screen due to database/code version mismatch:\n";
|
||||||
|
print "Code: @{[ WebGUI->VERSION ]} versus upgradeState setting in database: $upgradeState\n";
|
||||||
|
}
|
||||||
|
|
||||||
$session->end;
|
$session->end;
|
||||||
$session->close;
|
$session->close;
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue