summaryrefslogtreecommitdiff
path: root/.emacs.d
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2023-10-30 02:15:56 +0200
committerThanos Apollo <[email protected]>2023-10-30 02:15:56 +0200
commit288b2da19386efa5e29dfcf0ea09a954d880bb42 (patch)
treef46f4769fbdc52e9780050a4edda67617dd671e9 /.emacs.d
parent21d6aacc16e7f41823d223556493be6fe2604435 (diff)
emacs:(pass) Update launcher
Diffstat (limited to '.emacs.d')
-rw-r--r--.emacs.d/modules/thanos-pass.el13
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."