diff options
Diffstat (limited to 'global-functions')
| -rw-r--r-- | global-functions | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/global-functions b/global-functions index 42e5fcf..0b1ba77 100644 --- a/global-functions +++ b/global-functions @@ -379,16 +379,19 @@ :set ScriptFromTerminal do={ :local Script [ :tostr $1 ]; + :global LogPrintExit; + :foreach Job in=[ / system script job find where script=$Script ] do={ :set Job [ / system script job get $Job ]; :while ([ :typeof ($Job->"parent") ] = "id") do={ :set Job [ / system script job get [ find where .id=($Job->"parent") ] ]; } :if (($Job->"type") = "login") do={ - :log debug ("Script " . $Script . " started from terminal."); + $LogPrintExit debug ("Script " . $Script . " started from terminal.") false; :return true; } } + $LogPrintExit debug ("Script " . $Script . " NOT started from terminal.") false; :return false; } |