]> git.eshelyaron.com Git - emacs.git/commitdiff
Adapt tramp-otp-password-prompt-regexp
authorMichael Albinus <michael.albinus@gmx.de>
Sat, 16 Sep 2023 18:34:06 +0000 (20:34 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Sat, 16 Sep 2023 18:34:06 +0000 (20:34 +0200)
* lisp/net/tramp.el (tramp-otp-password-prompt-regexp):
Use `tramp-compat-password-colon-equivalents'.

lisp/net/tramp.el

index 5faf1e2647a52a9a910ee2f77d16c31520d2e368..b67683500de91144b58c1569a5ada14b7278eedc 100644 (file)
@@ -660,10 +660,11 @@ The `sudo' program appears to insert a `^@' character into the prompt."
   :type 'regexp)
 
 (defcustom tramp-otp-password-prompt-regexp
-  (rx bol (* nonl)
-      ;; JumpCloud.
-      (group (| "Verification code"))
-      (* nonl) (any "::៖") (* blank))
+  (rx-to-string
+   `(: bol (* nonl)
+       ;; JumpCloud.
+       (group (| "Verification code"))
+       (* nonl) (any . ,tramp-compat-password-colon-equivalents) (* blank)))
   "Regexp matching one-time password prompts.
 The regexp should match at end of buffer."
   :version "29.2"
@@ -1341,6 +1342,7 @@ let-bind this variable."
 ;; GNU/Linux (Debian, Suse, RHEL, Cygwin, MINGW64): /bin:/usr/bin
 ;; FreeBSD, DragonFly: /usr/bin:/bin:/usr/sbin:/sbin: - beware trailing ":"!
 ;; FreeBSD 12.1, Darwin: /usr/bin:/bin:/usr/sbin:/sbin
+;; NetBSD 9.3: /usr/bin:/bin:/usr/sbin:/sbin:/usr/pkg/bin:/usr/pkg/sbin:/usr/local/bin:/usr/local/sbin
 ;; IRIX64: /usr/bin
 ;; QNAP QTS: ---
 ;; Hydra: /run/current-system/sw/bin:/bin:/usr/bin
@@ -6560,8 +6562,8 @@ Consults the auth-source package."
 
 (defun tramp-read-passwd-without-cache (proc &optional prompt)
   "Read a password from user (compat function)."
-  ;; We suspend the timers while reading the password.
   (declare (tramp-suppress-trace t))
+  ;; We suspend the timers while reading the password.
   (let (tramp-dont-suspend-timers)
     (with-tramp-suspended-timers
       (password-read