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/functor.boot | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/interp/functor.boot')

diff --git a/src/interp/functor.boot b/src/interp/functor.boot
index 97e3938a..45cac30b 100644
--- a/src/interp/functor.boot
+++ b/src/interp/functor.boot
@@ -206,7 +206,7 @@ compCategories u ==
   atom v =>
     error ['"compCategories: could not get proper modemap for operator",first u]
   if rest v then
-    sayBrightly ['"compCategories: ", '%b, '"Warning", '%d,
+    sayBrightly ['"compCategories: ", '"%b", '"Warning", '"%d",
                  '"ignoring unexpected stuff at end of modemap"]
     pp rest v
   -- the next line "fixes" a bad modemap which sometimes appears ....
-- 
cgit v1.2.3