1
0
Fork 0

fix(emacs): add default value for grade-start argument

Signed-off-by: Lucas Sta Maria <lucas@priime.dev>
This commit is contained in:
Lucas Sta Maria 2024-02-12 17:54:19 -05:00
parent 765b4f4295
commit 2b1eb9c90e
No known key found for this signature in database
GPG key ID: F07FB16A826E3B47

View file

@ -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")))