From 21fb48291e77ee8c0eceda997e3855fd7bede8d6 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 22 Jan 2018 22:42:09 -0800
Subject: [PATCH] Don't use vertical brackets when unparsing uninterned symbol.

---
 src/runtime/unpars.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/runtime/unpars.scm b/src/runtime/unpars.scm
index a9d0cdd7a..ee66ac7d0 100644
--- a/src/runtime/unpars.scm
+++ b/src/runtime/unpars.scm
@@ -444,10 +444,10 @@ USA.
 
 (define (unparse/uninterned-symbol symbol context)
   (if (get-param:unparse-uninterned-symbols-by-name?)
-      (unparse-symbol symbol context)
+      (unparse-symbol-name (symbol->string symbol) context)
       (*unparse-with-brackets 'UNINTERNED-SYMBOL symbol context
         (lambda (context*)
-          (unparse-symbol symbol context*)))))
+	  (*unparse-string (symbol->string symbol) context)))))
 
 (define (unparse-symbol symbol context)
   (if (keyword? symbol)
-- 
2.25.1