From ad4fc762750781eac1747cf6d993ccba1434781d Mon Sep 17 00:00:00 2001 From: Svend Sorensen 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