From 81bb06e3fd33bad7aae956b7742421159e2d0df9 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sun, 12 Dec 2010 23:01:18 +0000
Subject: More clean up on string vs symbol confusions

---
 src/interp/i-analy.boot | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/interp/i-analy.boot')

diff --git a/src/interp/i-analy.boot b/src/interp/i-analy.boot
index 7ce9922e..8645b391 100644
--- a/src/interp/i-analy.boot
+++ b/src/interp/i-analy.boot
@@ -581,7 +581,7 @@ printableArgModeSetList() ==
   for a in reverse $origArgModeSetList repeat
     b := prefix2String first a
     if atom b then b := [b]
-    amsl := ['%l,:b,:amsl]
+    amsl := ['"%l",:b,:amsl]
   if amsl then amsl := rest amsl
   amsl
 
-- 
cgit v1.2.3