From: Damien Cassou <damien@cassou.me>
Date: Mon, 26 Mar 2018 04:28:17 +0000 (+0200)
Subject: Make sure auth-source-pass is compatible with Emacs 25
X-Git-Tag: emacs-27.0.90~4933
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=03c50fc7aecab0b42f9f80600d7cbc4c53bae54a;p=emacs.git

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.
---

diff --git a/lisp/auth-source-pass.el b/lisp/auth-source-pass.el
index 1193d67954b..d5c61398143 100644
--- a/lisp/auth-source-pass.el
+++ b/lisp/auth-source-pass.el
@@ -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)