Printing the section name as a fully qualified symbol.

40ants · Apr 25, 2021 · 03fc9e7 · 03fc9e7
1 parent 2be8ea4
commit 03fc9e7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/core.lisp b/src/core.lisp
@@ -153,7 +153,7 @@
 
 (defmethod print-object ((section section) stream)
   (print-unreadable-object (section stream :type t)
-    (format stream "~a" (section-name section))))
+    (format stream "~S" (section-name section))))
 
 
 ;; This function is from alexandria, to not