diff options
Diffstat (limited to 'global-functions')
| -rw-r--r-- | global-functions | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/global-functions b/global-functions index 63c0e21..d15d176 100644 --- a/global-functions +++ b/global-functions @@ -904,13 +904,18 @@ # lock script against multiple invocation :set ScriptLock do={ - :global LogPrintExit2; + :local Script [ :tostr $1 ]; + :local DoReturn $2; - :local Script [ :tostr $1 ]; + :global IfThenElse; + :global LogPrintExit2; :if ([ :len [ / system script job find where script=$Script ] ] > 1) do={ - $LogPrintExit2 info $0 ("Script " . $Script . " started more than once... Aborting.") true; + $LogPrintExit2 info $0 ("Script " . $Script . " started more than once... Aborting.") \ + [ $IfThenElse ($DoReturn = true) false true ]; + :return true; } + :return false; } # send notification via e-mail - expects at lease two string arguments |