switch-theme-if-default ( theme -- )

Vocabulary

ui.theme.switching

Inputs

theme

an object

Outputs

None

Definition

USING: kernel namespaces ;

IN: ui.theme.switching

: switch-theme-if-default ( theme -- )
    default-theme? get
    [ switch-theme t default-theme? set-global ] [ drop ] if ;