factor: remove rest of double paren words.

[factor.git] / basis / vocabs / hierarchy / hierarchy.factor

diff --git a/basis/vocabs/hierarchy/hierarchy.factor b/basis/vocabs/hierarchy/hierarchy.factor
index 26e0e8cd29392587e543089d5c27ec908435463d..3cc3e0fe663c91e5e47ea1157314830635f543c4 100644 (file)
--- a/basis/vocabs/hierarchy/hierarchy.factor
+++ b/basis/vocabs/hierarchy/hierarchy.factor
@@ -46,13 +46,13 @@ ERROR: vocab-root-required root ;
     [ drop '[ _ over vocab-dir? [ >vocab-link ] [ <vocab-prefix> ] if ] map! ]
     2tri ;
 
-: ((disk-vocabs-recursive)) ( root prefix -- )
+: disk-vocabs-recursive% ( root prefix -- )
     dupd vocab-name (disk-vocab-children) [ % ] keep
-    [ ((disk-vocabs-recursive)) ] with each ;
+    [ disk-vocabs-recursive% ] with each ;
 
 : (disk-vocabs-recursive) ( root prefix -- seq )
     [ ensure-vocab-root ] dip
-    [ ((disk-vocabs-recursive)) ] { } make ;
+    [ disk-vocabs-recursive% ] { } make ;
 
 : no-rooted ( seq -- seq' ) [ find-vocab-root ] reject ;