;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require ivy password-store] 2) (defvar ivy-pass-map (make-sparse-keymap)) (ivy-set-actions 'ivy-pass '(("e" ivy-pass--edit-action "edit") ("d" ivy-pass--delete-action "delete") ("a" ivy-pass--add-action "add") ("r" ivy-pass--rename-action "rename") ("g" ivy-pass--generate-action "generate"))) #@57 Ask for a new key based on KEY, then edit it. (fn KEY) (defalias 'ivy-pass--add-action #[257 "\300\301\"\302!\207" [read-string "New key: " password-store-edit] 4 (#$ . 422)]) #@153 Ask for a new key based on KEY, then generate an entry and password for it. Default PASSWORD-LENGTH is ‘password-store-password-length’. (fn KEY) (defalias 'ivy-pass--generate-action #[257 "\300\301\"\302!\210\303!\207" [read-string "Generate password for new key: " password-store-generate password-store-edit] 4 (#$ . 608)]) #@31 Edit entry for KEY. (fn KEY) (defalias 'ivy-pass--edit-action #[257 "\300!\207" [password-store-edit] 3 (#$ . 950)]) #@33 Delete entry for KEY. (fn KEY) (defalias 'ivy-pass--delete-action #[257 "\300\301\302\"!\205\f\303!\207" [yes-or-no-p format "Really delete the entry `%s'?" password-store-remove] 5 (#$ . 1075)]) #@33 Rename entry for KEY. (fn KEY) (defalias 'ivy-pass--rename-action #[257 "\300\301\302\"\"\303\"\207" [read-string format "Rename `%s' to: " password-store-rename] 5 (#$ . 1281)]) #@46 Add password for KEY to kill ring. (fn KEY) (defalias 'ivy-pass--password-action #[257 "\300!\207" [password-store-copy] 3 (#$ . 1471)]) #@57 Select an entry and copy its password to the kill ring. (defalias 'ivy-pass #[0 "\301\302\303\304 !\305\306\307\310\311&\207" [ivy-pass-map ivy-read "Copy password of entry: " password-store-list password-store-dir :require-match t :action ivy-pass--password-action :keymap] 9 (#$ . 1616) nil]) (provide 'ivy-pass)