Re: Passing user selection to a command

[Bruno Barbier]

Hi,

Heime <heimeborgia@protonmail.com> writes:

> How can I pass the user selection to 'activate-input-method' ?
>
>
> (defun glossus ()
>
>   (interactive
>    (list
>     (let ( (cseq '("italian-alt-postfix" "italian-keyboard"
>                      "italian-postfix")) )
>       (completing-read
>         " Glossus: " cseq nil t "italian-postfix"))))
>
>   (setq ispell-local-dictionary "it_IT")
>   (activate-input-method "italian-postfix") )

IIUC, you could do this:

    (defun my-glossus (user-sel)  ;; <==== var name here
      (interactive 
       (list
        (let ( (cseq '("italian-alt-postfix" "italian-keyboard"
                       "italian-postfix")) )
          (completing-read
           " Glossus: " cseq nil t "italian-postfix"))))

      (setq ispell-local-dictionary "it_IT")
      (activate-input-method user-sel))
      

Bruno