diff options
| author | Evgeny Zajcev <lg.zevlg@gmail.com> | 2019-09-04 18:09:55 +0300 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2019-09-07 13:04:36 +0300 |
| commit | 52f83af1f3975130b6bd035166780c2c2dde778c (patch) | |
| tree | f95588119dd528b167f645266eb0fa46f2e5ab46 /lisp/international/quail.el | |
| parent | 40eb4c51a40a37c14e882e6db3f880ba4528c089 (diff) | |
| download | emacs-52f83af1f3975130b6bd035166780c2c2dde778c.tar.gz | |
Fix input method operation on read-only text
* lisp/international/quail.el (quail-input-method): Check also
read-only property of text in addition to the buffer's
read-only state.
Diffstat (limited to 'lisp/international/quail.el')
| -rw-r--r-- | lisp/international/quail.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/quail.el b/lisp/international/quail.el index f42b594dc46..e91175fb832 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el @@ -1329,7 +1329,8 @@ If STR has `advice' text property, append the following special event: (defvar quail-conversion-str nil) (defun quail-input-method (key) - (if (or (and buffer-read-only + (if (or (and (or buffer-read-only + (get-char-property (point) 'read-only)) (not (or inhibit-read-only (get-char-property (point) 'inhibit-read-only)))) (and overriding-terminal-local-map |