Make sure auth-source-pass is compatible with Emacs 25

* lisp/auth-source-pass.el: Use `advice-add' for Emacs 25 users as
`auth-source-backend-parser-functions' does not exist there.
This commit is contained in:
Damien Cassou
2018-03-26 06:28:17 +02:00
committed by Nicolas Petton
parent a6cbdd4e6f
commit 03c50fc7ae

View File

@@ -92,7 +92,9 @@ See `auth-source-search' for details on SPEC."
(when (eq entry 'password-store)
(auth-source-backend-parse-parameters entry auth-source-pass-backend)))
(add-hook 'auth-source-backend-parser-functions #'auth-source-pass-backend-parse)
(if (boundp 'auth-source-backend-parser-functions)
(add-hook 'auth-source-backend-parser-functions #'auth-source-pass-backend-parse)
(advice-add 'auth-source-backend-parse :before-until #'auth-source-pass-backend-parse))
(defun auth-source-pass-get (key entry)