m-chrzan.xyz
aboutsummaryrefslogtreecommitdiff
path: root/contrib/emacs
diff options
context:
space:
mode:
authorSvend Sorensen <svend@ciffer.net>2014-05-07 14:53:08 -0700
committerSvend Sorensen <svend@ciffer.net>2014-05-07 15:55:10 -0700
commit8a491f16961dd120fed6a4e154d0ef9b5a4cae7b (patch)
tree36d3200f1efe5fe5d8a480f6a4da6b2713056ef0 /contrib/emacs
parent648e53b8249bd9d81814bc1a8bd1d0fe6f72d31f (diff)
Reorder interactive function to match order of helper functions
Diffstat (limited to 'contrib/emacs')
-rw-r--r--contrib/emacs/password-store.el26
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