* mime-edit.el (mime-edit-temp-message-buffer): Define.

[elisp/semi.git] / pgg.el

diff --git a/pgg.el b/pgg.el
index 2b17b3e..1a25d91 100644 (file)
--- a/pgg.el
+++ b/pgg.el
@@ -416,6 +416,15 @@ signer's public key from `pgg-default-keyserver-address'."
          (insert-buffer-substring pgg-output-buffer)
          (pgg-snarf-keys-region (point-min)(point-max)))))))
 
+;;;###autoload
+(defun pgg-universal-user-id-argument ()
+  (interactive)
+  (let* ((pgg-overriding-user-id (read-string "User ID: "))
+        (command (key-binding (read-key-sequence
+                               (format "Command to execute on \"%s\":"
+                                       pgg-overriding-user-id)))))
+    (message "")
+    (call-interactively command)))
 
 (provide 'pgg)