Allow finding gpg2 binaries when gpg2 has an "unknown" version string

* lisp/epg-config.el (epg-find-configuration): Allow finding a
usable configuration even if the version string looks like "gpg
(GnuPG) 2.2.15-unknown" (bug#35629).
This commit is contained in:
Lars Ingebrigtsen 2019-08-26 08:02:31 +02:00
parent f5fa0c9062
commit 42ba6200af

View file

@ -148,7 +148,11 @@ Otherwise, it tries the programs listed in the entry until the
version requirement is met."
(unless program-alist
(setq program-alist epg-config--program-alist))
(let ((entry (assq protocol program-alist)))
(let ((entry (assq protocol program-alist))
;; In many gnupg distributions (especially on Windows), the
;; version string is "gpg (GnuPG) 2.2.15-unknown" or the like.
(version-regexp-alist (cons '("^[-._+ ]?unknown$" . -4)
version-regexp-alist)))
(unless entry
(error "Unknown protocol %S" protocol))
(cl-destructuring-bind (symbol . alist)