From 94a370cb80dd21bbd12216c1ba657993b937b89e Mon Sep 17 00:00:00 2001 From: Lucas Sta Maria Date: Sat, 30 Nov 2024 00:24:29 -0500 Subject: [PATCH] refactor(emacs): create new `justfile--get-recipes` command Signed-off-by: Lucas Sta Maria --- .emacs.d/include/priime-languages.el | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/.emacs.d/include/priime-languages.el b/.emacs.d/include/priime-languages.el index 83cc161..8a2d3e4 100644 --- a/.emacs.d/include/priime-languages.el +++ b/.emacs.d/include/priime-languages.el @@ -3,12 +3,17 @@ ;; Provides configuration for programming language packages. ;;; Code: +(defun justl--current-recipes () + "Retrieve the current recipe names from the current directory." + (let* ((justfile (justl--find-justfile default-directory)) + (raw-entries (justl--get-recipes justfile)) + (entry-names (mapcar #'justl--recipe-name raw-entries))) + entry-names)) + (defun justl-recipes () "Pick and execute a just recipe." (interactive) - (let* ((justfile (justl--find-justfile default-directory)) - (raw-entries (justl--get-recipes justfile)) - (entry-names (mapcar #'justl--recipe-name raw-entries)) + (let* ((entry-names (justl--current-recipes)) (just-recipe (completing-read "just recipe: " entry-names nil t nil))) (justl--exec justl-executable