Skip to content

Commit 0fe26d0

Browse files
committed
fixup! Suspend text-conversion-style while transient is active
1 parent 8b7fae0 commit 0fe26d0

1 file changed

Lines changed: 4 additions & 4 deletions

File tree

lisp/transient.el

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -5112,13 +5112,13 @@ search instead."
51125112
lisp-imenu-generic-expression :test #'equal)
51135113

51145114
(defun transient--suspend-text-conversion-style ()
5115-
(static-if (fboundp 'set-text-conversion-style) ; since Emasc 30.1
5115+
(static-if (boundp 'overriding-text-conversion-style) ; since Emasc 30.1
51165116
(when text-conversion-style
5117-
(letrec ((suspended text-conversion-style)
5117+
(letrec ((suspended overriding-text-conversion-style)
51185118
(fn (lambda ()
5119-
(set-text-conversion-style suspended)
5119+
(setq overriding-text-conversion-style nil)
51205120
(remove-hook 'transient-exit-hook fn))))
5121-
(set-text-conversion-style nil)
5121+
(setq overriding-text-conversion-style suspended)
51225122
(add-hook 'transient-exit-hook fn)))))
51235123

51245124
(declare-function which-key-mode "ext:which-key" (&optional arg))

0 commit comments

Comments
 (0)