[elpa] externals/openpgp 9b17ce593f 13/30: Added email autocompletion for openpgp-upload-key-file

[ELPA Syncer]

branch: externals/openpgp
commit 9b17ce593fcf6e3d64f333d15f31c9a13e042773
Author: Philip Kaludercic <philip.kaludercic@fau.de>
Commit: Philip Kaludercic <philip.kaludercic@fau.de>

    Added email autocompletion for openpgp-upload-key-file
---
 openpgp.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/openpgp.el b/openpgp.el
index 14c74832bd..a7fb448b67 100644
--- a/openpgp.el
+++ b/openpgp.el
@@ -1,4 +1,4 @@
-;;; $Id: openpgp.el,v 1.11 2020/03/05 13:04:20 oj14ozun Exp oj14ozun $
+;;; $Id: openpgp.el,v 1.12 2020/03/05 13:28:41 oj14ozun Exp oj14ozun $
 ;;; Implementation of the keys.openpgp.org protocol as specified by
 ;;; https://keys.openpgp.org/about/api
 
@@ -118,7 +118,8 @@ key."
 
 (defun openpgp-upload-key-file (email key-file)
   "Upload key from KEY-FILE for address EMAIL."
-  (interactive (list (read-string "Email: " nil nil user-mail-address)
+  (interactive (list (completing-read "Email: " (openpgp--key-ids)
+                                     nil nil nil nil user-mail-address)
                     (read-file-name "Key file: ")))
   (with-temp-buffer
     (insert-file-contents key-file)