remove leftover testing variable

dnaeon · Jun 3, 2024 · f2a730f · f2a730f
1 parent 1e6e0f1
commit f2a730f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/command.lisp b/src/command.lisp
@@ -1057,7 +1057,7 @@ _~~A() {
         (dolist (line lines)
           (format stream "  ~A~%" line))
         (format stream "~%")
-        (dolist (line (split-sequence #\Newline *s*))
+        (dolist (line (split-sequence #\Newline code))
           (format T "    ~A~%" line))
         (format stream "~%"))))