mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-28 16:21:07 -08:00
Code Issues Projects Releases Wiki Activity

(mac-ts-unicode-for-key-event): Check if text is available.

Browse source
This commit is contained in:
YAMAMOTO Mitsuharu 2007-05-07 08:05:55 +00:00
parent 589e28cdeb
commit 59c58feafb
2 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2007-05-07 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
* term/mac-win.el (mac-ts-unicode-for-key-event): Check if text is
available.
2007-05-06 Richard Stallman <rms@gnu.org>
* emacs-lisp/eldoc.el (turn-on-eldoc-mode): Doc fix.

3
lisp/term/mac-win.el
View file

@ -2104,7 +2104,8 @@ either in the current buffer or in the echo area."
(coding (or (cdr (assq (car script-language)
mac-script-code-coding-systems))
'mac-roman)))
(mac-unread-string (mac-utxt-to-string text coding))))
(if text
(mac-unread-string (mac-utxt-to-string text coding)))))
;; kEventClassTextInput/kEventTextInputUpdateActiveInputArea
(define-key mac-apple-event-map [text-input update-active-input-area]