init-xim ( classname -- )

Vocabulary

x11.xim

Inputs

classname

an object

Outputs

None

Definition

USING: kernel namespaces ;

IN: x11.xim

: init-xim ( classname -- )
    dup "" (init-xim)
    [ nip ] [
        "@im=none" (init-xim)
        [ "XOpenIM() failed" throw ] unless*
    ] if* xim set-global ;