From 08eefe55f399afa6348334f500b44f1b9f216515 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Mon, 7 Nov 2011 22:48:33 +0000
Subject: Fix thinko

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

(limited to 'src/interp')

diff --git a/src/interp/define.boot b/src/interp/define.boot
index 34a79a41..4989ec38 100644
--- a/src/interp/define.boot
+++ b/src/interp/define.boot
@@ -1768,7 +1768,7 @@ compDefineCapsuleFunction(df is ['DEF,form,signature,body],
       not symbolMember?($op,$formalArgList) and
         getXmode($op,e) is ['Mapping,:.] => 'local
       'exported
-    formattedSig := formatUnabbreviatedSig ['Mapping,:signature']
+    formattedSig := formatUnabbreviatedSig signature'
     sayBrightly ['"   compiling ",localOrExported,
       :bright $op,'": ",:formattedSig]
  
-- 
cgit v1.2.3