mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

Only call set-text-conversion-style if it exists

Browse source 
* lisp/auth-source.el (read-passwd): Guard call, as it was before the
code was moved here.
`set-text-conversion-style` is not present in all configurations.
This commit is contained in:
Mattias Engdegård 2024-04-05 15:54:30 +02:00
parent 200a0e5e7d
commit 4fc84cb23b
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/auth-source.el
View file

@ -2547,7 +2547,6 @@ Adapt also mode line."
(read-passwd-toggle-visibility)))
(defvar overriding-text-conversion-style)
(declare-function set-text-conversion-style "textconv.c")
;;;###autoload
(defun read-passwd (prompt &optional confirm default)
@ -2605,7 +2604,8 @@ by doing (clear-string STRING)."
;; And of course, don't keep the sensitive data around.
(erase-buffer)
;; Then restore the previous text conversion style.
(set-text-conversion-style text-conversion-style))))))))
(when (fboundp 'set-text-conversion-style)
(set-text-conversion-style text-conversion-style)))))))))
(provide 'auth-source)