Re: Proper way to add bindings under C-x 8

[Howard Melman <hmelman@gmail.com>]

Robert Pluim <rpluim@gmail.com> writes:

> In the meantime, thereʼs nothing stopping you from adding
> bindings to the keymap used for 'C-x' without using
> iso-transl-define-keys. Itʼs a bit more verbose, but works
> fine:
>
>     (let ((map (make-sparse-keymap)))
>       (define-key map "s" [?♠?️])
>       (define-key map "C" [?♣?️])
>       (define-key map "H" [?♥?️])
>       (define-key map "D" [?♦?️])
>       (define-key ctl-x-map "8e" map))

I went with the following:

(let ((map (make-sparse-keymap)))
  (define-key map "c" (string-to-vector "✅️"))
  (define-key map "u" (string-to-vector "👍️"))
  (define-key map "d" (string-to-vector "👎️"))
  (define-key map "w" (string-to-vector "🖐️"))
  (define-key map "t" (string-to-vector "📺️"))
  (define-key map "S" (string-to-vector "♠️"))
  (define-key map "C" (string-to-vector "♣️"))
  (define-key map "H" (string-to-vector "♥️"))
  (define-key map "D" (string-to-vector "♦️"))
  (define-key ctl-x-map "8e" map))

-- 

Howard