diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2019-10-15 11:08:03 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2019-10-15 11:08:18 -0400 |
| commit | 6ac99ebb3f623c64379f5c6811f1cdeb6ecac7da (patch) | |
| tree | 7ff7086beab5d146c72a3aeebe893e58a0f09079 /lisp/rect.el | |
| parent | 06114b79a5c860fc1eb2393f8167d358d5b55d89 (diff) | |
| download | emacs-6ac99ebb3f623c64379f5c6811f1cdeb6ecac7da.tar.gz emacs-6ac99ebb3f623c64379f5c6811f1cdeb6ecac7da.tar.bz2 emacs-6ac99ebb3f623c64379f5c6811f1cdeb6ecac7da.zip | |
* lisp/rect.el (string-rectangle): Inherit input method in minibuffer
Diffstat (limited to 'lisp/rect.el')
| -rw-r--r-- | lisp/rect.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/rect.el b/lisp/rect.el index 34f79e3ed3c..4d4d6146f21 100644 --- a/lisp/rect.el +++ b/lisp/rect.el @@ -520,7 +520,8 @@ Called from a program, takes three args; START, END and STRING." (read-string (format "String rectangle (default %s): " (or (car string-rectangle-history) "")) nil 'string-rectangle-history - (car string-rectangle-history))))))) + (car string-rectangle-history) + 'inherit-input-method)))))) ;; If we undo this change, we want to have the point back where we ;; are now, and not after the first line in the rectangle (which is ;; the first line to be changed by the following command). @@ -613,7 +614,7 @@ with a prefix argument, prompt for START-AT and FORMAT." (apply-on-rectangle 'rectangle-number-line-callback start end format))) -;;; New rectangle integration with kill-ring. +;;; Rectangle integration with kill-ring. ;; FIXME: known problems with the new rectangle support: ;; - lots of commands handle the region without paying attention to its |