mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

epg: Adjust to GnuPG 2.1 key listing change

Browse source 
* epg.el (epg--list-keys-1): Ignore fields after the 15th field
(bug#18979).  Reported by Hideki Saito.
This commit is contained in:
Daiki Ueno 2014-11-07 11:31:12 +09:00
parent 55ea575e13
commit 135a9f4b5a
2 changed files with 8 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/epg.el
View file

@ -1278,8 +1278,9 @@ callback data (if any)."
string (match-string 0)
index 0
field 0)
(while (eq index
(string-match "\\([^:]+\\)?:" string index))
(while (and (< field (length (car keys)))
(eq index
(string-match "\\([^:]+\\)?:" string index)))
(setq index (match-end 0))
(aset (car keys) field (match-string 1 string))
(setq field (1+ field))))