hg.stevelosh.com > dotfiles

(in-package :stumpwm-user)

(defcommand pass-personal () ()
  (let ((pass:*password-store* "/home/sjl/.password-store/")
        (pass:*pass-notification-message* t))
    (pass:pass-copy)))

(defcommand pass-um-1 () ()
  (echo "Copying UM level 1 password, touch key.")
  (run-shell-command "pass -c umich.edu/slosh"))

(defcommand pass-um-2 () ()
  (echo "Copying UM level 2 password, touch key.")
  (run-shell-command "pass -c umich.edu/l2"))

(defcommand switch-yubikeys () ()
  (echo (run-shell-command "switch-yubikeys" t)))

(defcommand generate-password () ()
  (run-shell-command "genpass | pbc")
  (message "Generated a fresh password and copied it to the clipboard."))
author	Steve Losh <steve@stevelosh.com>
date	Thu, 13 Jun 2024 12:30:10 -0400
parents	4673e928c08e
children	(none)