diff options
author | Svend Sorensen <svend@ciffer.net> | 2014-05-07 14:53:08 -0700 |
---|---|---|
committer | Svend Sorensen <svend@ciffer.net> | 2014-05-07 15:55:10 -0700 |
commit | 8a491f16961dd120fed6a4e154d0ef9b5a4cae7b (patch) | |
tree | 36d3200f1efe5fe5d8a480f6a4da6b2713056ef0 | |
parent | 648e53b8249bd9d81814bc1a8bd1d0fe6f72d31f (diff) |
Reorder interactive function to match order of helper functions
-rw-r--r-- | contrib/emacs/password-store.el | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/contrib/emacs/password-store.el b/contrib/emacs/password-store.el index 59a12f7..25556d2 100644 --- a/contrib/emacs/password-store.el +++ b/contrib/emacs/password-store.el @@ -186,6 +186,13 @@ after `password-store-timeout' seconds." (run-at-time password-store-timeout nil 'password-store-clear))) ;;;###autoload +(defun password-store-insert (entry password) + "Insert a new ENTRY containing PASSWORD." + (interactive (list (read-string "Password entry: ") + (read-passwd "Password: " t))) + (message (shell-command-to-string (format "echo %s | %s insert -m -f %s" password password-store-executable entry)))) + +;;;###autoload (defun password-store-generate (entry &optional password-length) "Generate a new password for ENTRY with PASSWORD-LENGTH. @@ -200,19 +207,18 @@ Default PASSWORD-LENGTH is `password-store-password-length'." nil) ;;;###autoload -(defun password-store-insert (entry password) - "Insert a new ENTRY containing PASSWORD." - (interactive (list (read-string "Password entry: ") - (read-passwd "Password: " t))) - (message (shell-command-to-string (format "echo %s | %s insert -m -f %s" password password-store-executable entry)))) - -;;;###autoload (defun password-store-remove (entry) "Remove existing password for ENTRY." (interactive (list (password-store--completing-read))) (message (password-store--run-remove entry t))) ;;;###autoload +(defun password-store-version () + "Show version of pass executable." + (interactive) + (message (password-store--run-version))) + +;;;###autoload (defun password-store-url (entry) "Browse URL stored in ENTRY. @@ -225,12 +231,6 @@ avoid sending a password to the browser." (browse-url url) (error "%s" "String does not look like a URL")))) -;;;###autoload -(defun password-store-version () - "Show version of pass executable." - (interactive) - (message (password-store--run-version))) - (provide 'password-store) ;;; password-store.el ends here |