diff options
| -rw-r--r-- | .emacs.d/modules/thanos-pass.el | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/.emacs.d/modules/thanos-pass.el b/.emacs.d/modules/thanos-pass.el index e3e805d..86f1369 100644 --- a/.emacs.d/modules/thanos-pass.el +++ b/.emacs.d/modules/thanos-pass.el @@ -35,29 +35,28 @@ (defun thanos/pass-launcher () "Launch Emacs as a front-end for pass." (interactive) - (let ((vertico-count 100)) (unwind-protect (with-selected-frame (make-frame '((name . "thanos/pass-launcher") (fullscreen . 0) (undecorated . t) - (minibuffer . only))) + (minibuffer . only) + (width . 70) + (height . 15))) (let* ((choice (completing-read "Choose an action: " '("AUTO" "COPY PASS" "COPY USERNAME" "EDIT" "GENERATE"))) (action (pcase choice - ("AUTO" #'(lambda (entry) - (let ((user (password-store-get-field entry "user")) - (pass (password-store-get entry))) + ("AUTO" #'(lambda (entry) (let ((user (password-store-get-field entry "user")) (pass (password-store-get entry))) (start-process-shell-command "xdotool" nil (format "sleep 0.3 && xdotool getactivewindow type '%s' && xdotool getactivewindow key Tab && xdotool getactivewindow type '%s'" - (if user user 'thanosapollo22) pass))))) + (if user user 'thanosapollo) pass))))) ("COPY PASS" #'password-store-copy) ("COPY USERNAME" #'(lambda (entry) (password-store-copy-field entry "user"))) ("EDIT" #'password-store-edit) ("GENERATE" #'password-store-generate)))) (funcall action (completing-read "Search: " (password-store-list))) - (delete-frame)))))) + (delete-frame))))) (defun smtp-get-pass () "Get password for smtp." |