emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 4fc84cb23b6: Only call set-text-conversion-style if it exists


From: Mattias Engdegård
Subject: master 4fc84cb23b6: Only call set-text-conversion-style if it exists
Date: Fri, 5 Apr 2024 09:57:03 -0400 (EDT)

branch: master
commit 4fc84cb23b6d671b44f18b8462e94c3bcfc3ee09
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>

    Only call set-text-conversion-style if it exists
    
    * 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.
---
 lisp/auth-source.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index a8bd9855720..e6dbead7476 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -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)
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]