hiro/ement.el
1
0
Fork 0
mirror of https://github.com/vale981/ement.el synced 2025-03-05 09:21:37 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix: (ement-room-compose-from-minibuffer) Setting input-method

Browse source 
See #16.  Thanks to @vizs for reporting.
This commit is contained in:
Adam Porter 2021-08-10 04:42:11 -05:00
parent 449cf5962f
commit f9a67dbba6
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
ement-room.el
View file

@ -2022,14 +2022,14 @@ To be called from a minibuffer opened from
(let* ((body (minibuffer-contents))
(compose-fn-symbol (gensym (format "ement-compose-%s" (or (ement-room-canonical-alias ement-room)
(ement-room-id ement-room)))))
(input-method current-input-method) ; Capture this value from the minibuffer.
(compose-fn (lambda ()
;; HACK: Since exiting the minibuffer restores the previous window configuration,
;; we have to do some magic to get the new compose buffer to appear.
;; TODO: Use letrec with Emacs 27.
(remove-hook 'minibuffer-exit-hook compose-fn-symbol)
(let ((input-method current-input-method))
(ement-room-compose-message ement-room ement-session :body body)
(set-input-method input-method))
(ement-room-compose-message ement-room ement-session :body body)
(set-input-method input-method) ; Set in compose buffer.
(let* ((compose-buffer (current-buffer))
(show-buffer-fn-symbol (gensym "ement-show-compose-buffer"))
(show-buffer-fn (lambda ()