bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#19416: 25.0.50; enhancement of xterm mouse tracking: draging the mou


From: Stefan Monnier
Subject: bug#19416: 25.0.50; enhancement of xterm mouse tracking: draging the mouse now generates mouse-movement events
Date: Wed, 07 Jan 2015 17:46:17 -0500
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/25.0.50 (gnu/linux)

> Yes, thats perfectly fine with me.
> I tried the following, but wasn't successfull:

> (defun read-utf8-char (&optional prompt inherit-input-method seconds)
>   "..."
>   (let ((tmp (keyboard-coding-system)))
>     (set-keyboard-coding-system 'utf-8)
>     (prog1 (read-char prompt inherit-input-method seconds)
>       (set-keyboard-coding-system tmp))))

> (insert (read-utf8-char))

The nil value of inherit-input-method prevents the keyboard decoding.
Try

(defun read-utf8-char (&optional prompt seconds)
  "..."
  (let ((tmp (keyboard-coding-system)))
    (set-keyboard-coding-system 'utf-8)
    (prog1 (read-event prompt t seconds)
      (set-keyboard-coding-system tmp))))


-- Stefan





reply via email to

[Prev in Thread] Current Thread [Next in Thread]