set-stop-after-last-window? ( -- )

Vocabulary

tools.deploy.shaker

Inputs

None

Outputs

None

Definition

USING: assocs kernel namespaces sequences words ;

IN: tools.deploy.shaker

: set-stop-after-last-window? ( -- )
    get-namestack [ "stop-after-last-window?" swap key? ] any? [
        "ui-stop-after-last-window?" "ui.backend" lookup-word
        [ "stop-after-last-window?" get swap set-global ] when*
    ] when ;