From ff8a6b5bb611fa5094de230e38c7f35188726e79 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Tue, 1 Mar 2022 11:39:08 -0600 Subject: bugfix; forgot to update the --explain function to use --id --- src/lib.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/lib.lisp b/src/lib.lisp index f9d81aa..2f25ac7 100644 --- a/src/lib.lisp +++ b/src/lib.lisp @@ -165,8 +165,8 @@ the directories that appear in the value of that variable." (progn ,@body) (format t "Could not find the oneliner specified by ~a~%" ,nvar))))) -(defun print-item-explanation (number) - (with-cached-result (ol number) +(defun print-item-explanation (number &optional idp) + (with-cached-result (ol number idp) (when (getf ol :explanation) (princ #\newline) (princ (getf ol :explanation))))) -- cgit v1.2.3