global-functions: $ScriptInstallUpdate: log and print changes

This commit is contained in:
Christian Hesse 2020-04-01 11:38:25 +02:00
parent da581dedbf
commit afd33b8e25

View file

@ -482,6 +482,7 @@
" is out of date. Please update " . $ConfigScript . ", then increase " . \ " is out of date. Please update " . $ConfigScript . ", then increase " . \
"\$GlobalConfigVersion (currently " . $GlobalConfigVersion . \ "\$GlobalConfigVersion (currently " . $GlobalConfigVersion . \
") to " . $ExpectedConfigVersion . " and re-run " . $ConfigScript . "."); ") to " . $ExpectedConfigVersion . " and re-run " . $ConfigScript . ".");
$LogPrintExit info ($NotificationMessage) false;
$LogPrintExit debug ("Fetching changelog.") false; $LogPrintExit debug ("Fetching changelog.") false;
:do { :do {
@ -496,6 +497,7 @@
:for I from=($GlobalConfigVersion + 1) to=$ExpectedConfigVersion do={ :for I from=($GlobalConfigVersion + 1) to=$ExpectedConfigVersion do={
:set NotificationMessage ($NotificationMessage . \ :set NotificationMessage ($NotificationMessage . \
"\n * " . $GlobalConfigChanges->[ :tostr $I ]); "\n * " . $GlobalConfigChanges->[ :tostr $I ]);
$LogPrintExit info ("Change: " . $GlobalConfigChanges->[ :tostr $I ]) false;
} }
:set GlobalConfigChanges; :set GlobalConfigChanges;
} on-error={ } on-error={