bug#29663: 26.0.90; autho-source-pass-entries hardcodes .password-store directory

[John Wiegley]

`auth-source-pass-entries' is defined as follows:

  (defun auth-source-pass-entries ()
    "Return a list of all password store entries."
    (let ((store-dir (expand-file-name "~/.password-store/")))
      (mapcar
       (lambda (file) (file-name-sans-extension (file-relative-name file 
store-dir)))
       (directory-files-recursively store-dir "\.gpg$"))))

However, the pass utility does not require that this be the directory where
passwords are stored. This should be a customizable variable, initialized from
the value of (getenv "PASSWORD_STORE_DIR") if set.

-- 
John Wiegley                  GPG fingerprint = 4710 CF98 AF9B 327B B80F
http://newartisans.com                          60E1 46C4 BD1A 7AC1 4BA2