From 405b26b25643cd45401437401a150b226e032473 Mon Sep 17 00:00:00 2001 From: Lucas Sta Maria Date: Fri, 2 Feb 2024 17:33:48 -0500 Subject: [PATCH] fix(emacs): don't require `dired-mode` for `grade-file-format` Signed-off-by: Lucas Sta Maria --- .emacs.d/include/misc.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/.emacs.d/include/misc.el b/.emacs.d/include/misc.el index 473eaa3..fcb3a94 100644 --- a/.emacs.d/include/misc.el +++ b/.emacs.d/include/misc.el @@ -189,9 +189,7 @@ (defun grade-file-format (num) "Format NUM to a file in the grading directory." - (unless (eq major-mode 'dired-mode) - (error "Must be in Dired directory")) - (let* ((dir (dired-current-directory)) + (let* ((dir (file-name-directory (buffer-file-name))) (dir-files (directory-files dir)) (extension ".rkt") (all-rkt-files (-filter (lambda (f) (string= (file-name-extension f) "rkt"))