From ad4fc762750781eac1747cf6d993ccba1434781d Mon Sep 17 00:00:00 2001
From: Svend Sorensen <svend@ciffer.net>
Date: Wed, 7 May 2014 15:29:05 -0700
Subject: Implement interactive init function
---
contrib/emacs/password-store.el | 8 ++++++++
1 file changed, 8 insertions(+)
(limited to 'contrib')
diff --git a/contrib/emacs/password-store.el b/contrib/emacs/password-store.el
index 60db318..1863185 100644
--- a/contrib/emacs/password-store.el
+++ b/contrib/emacs/password-store.el
@@ -185,6 +185,14 @@ after `password-store-timeout' seconds."
(message "Copied %s to the kill ring. Will clear in %s seconds." entry password-store-timeout)
(run-at-time password-store-timeout nil 'password-store-clear)))
+;;;###autoload
+(defun password-store-init (gpg-id)
+ "Initialize new password store and use GPG-ID for encryption.
+
+Separate multiple IDs with spaces."
+ (interactive (list (read-string "GPG ID: ")))
+ (message (password-store--run-init (split-string gpg-id))))
+
;;;###autoload
(defun password-store-insert (entry password)
"Insert a new ENTRY containing PASSWORD."
--
cgit v1.2.3