Fix test failures of test/lisp/auth-source-pass-tests.el
Failures introduced by recent "Make auth-source-pass-search understand
port lists", commit 92fda5a7f9.
* lisp/auth-source-pass.el
(auth-source-pass--generate-entry-suffixes): Fix test failures.
This commit is contained in:
@@ -277,7 +277,7 @@ PORT may be a list of ports."
|
||||
(seq-mapcat
|
||||
(lambda (p)
|
||||
(auth-source-pass--name-port-user-suffixes domain user p))
|
||||
(if (listp port) port (list port))))
|
||||
(if (consp port) port (list port))))
|
||||
domains)))
|
||||
|
||||
(defun auth-source-pass--domains (name-components)
|
||||
|
||||
Reference in New Issue
Block a user