disambiguate namespaces:set and sets:set.

[factor.git] / basis / see / see.factor

diff --git a/basis/see/see.factor b/basis/see/see.factor
index 1b006b1ff26760d1be2fc3c96e303e59f0d4eede..a88b85843286343270815450fa8edf89748ca88e 100644 (file)
--- a/basis/see/see.factor
+++ b/basis/see/see.factor
@@ -20,8 +20,8 @@ GENERIC: see* ( defspec -- )
 : synopsis ( defspec -- str )
     [
         string-limit? off
-        0 margin set
-        1 line-limit set
+        0 margin namespaces:set
+        1 line-limit namespaces:set
         [ synopsis* ] with-in
     ] with-string-writer ;
 
@@ -46,7 +46,7 @@ M: word print-stack-effect? drop t ;
 <PRIVATE
 
 : seeing-word ( word -- )
-    vocabulary>> dup [ lookup-vocab ] when pprinter-in set ;
+    vocabulary>> dup [ lookup-vocab ] when pprinter-in namespaces:set ;
 
 : word-synopsis ( word -- )
     {
@@ -92,7 +92,8 @@ M: pathname synopsis* pprint* ;
 
 M: alias summary
     [
-        0 margin set 1 line-limit set
+        0 margin namespaces:set
+        1 line-limit namespaces:set
         [
             {
                 [ seeing-word ]
@@ -127,8 +128,8 @@ M: word declarations.
 
 M: object see*
     [
-        12 nesting-limit set
-        100 length-limit set
+        12 nesting-limit namespaces:set
+        100 length-limit namespaces:set
         <colon dup synopsis*
         <block dup definition pprint-elements block>
         dup definer nip [ pprint-word ] when* declarations.