diff options
| author | bd <bdunahu@operationnull.com> | 2025-04-20 03:10:40 -0400 |
|---|---|---|
| committer | bd <bdunahu@operationnull.com> | 2025-04-20 03:10:40 -0400 |
| commit | 8b3fdb7d25693645957c522ec5834b5d5b3c3b75 (patch) | |
| tree | 8ddc5827dbd69432487fbc49925f32997c3268ce /.config/emacs/modules/bd--gpg.el | |
| parent | a47765a19b1946aa3682daa0f553847c4d809ffd (diff) | |
Remove emacs-f
Diffstat (limited to '.config/emacs/modules/bd--gpg.el')
| -rw-r--r-- | .config/emacs/modules/bd--gpg.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/.config/emacs/modules/bd--gpg.el b/.config/emacs/modules/bd--gpg.el index 5fb1ac8..88d9425 100644 --- a/.config/emacs/modules/bd--gpg.el +++ b/.config/emacs/modules/bd--gpg.el @@ -3,7 +3,6 @@ ;;; Code: -(require 'f) (defvar bd/password-store-kill-ring-pointer nil "The tail of the kill ring whose car is the password.") (defvar bd/password-store-time-before-clear 10 @@ -12,8 +11,8 @@ (defun bd/password-store-list () "List password-store entries." (mapcar (lambda (file) - (f-no-ext (f-relative file "~/.password-store/"))) - (f-files "~/.password-store" (lambda (file) (equal (f-ext file) "gpg")) t))) + (file-name-sans-extension (file-relative-name file "~/.password-store/"))) + (directory-files-recursively "~/.password-store" ".*\\.gpg$"))) (defun bd/password-store-clear (id) "Clears the most recent password copied to the kill ring, printing ID." |