From 2b1eb9c90e4b8d32f56155e24272487c0cfaa0ee Mon Sep 17 00:00:00 2001 From: Lucas Sta Maria Date: Mon, 12 Feb 2024 17:54:19 -0500 Subject: [PATCH] fix(emacs): add default value for `grade-start` argument Signed-off-by: Lucas Sta Maria --- .emacs.d/include/misc.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/.emacs.d/include/misc.el b/.emacs.d/include/misc.el index f3c762a..0445b92 100644 --- a/.emacs.d/include/misc.el +++ b/.emacs.d/include/misc.el @@ -323,8 +323,10 @@ (keymap-global-set "C-c f" #'grade-next) (keymap-global-set "C-c b" #'grade-prev) - (let* ((start (or start - (string-to-number (read-string "File number to start with: ")))) + (let* ((file-msg "File number to start with (default 0):") + (start (or start + (string-to-number (read-string file-msg)) + 1)) (dir (if (eq major-mode 'dired-mode) (dired-current-directory) (error "Must be in Dired directory")))