tools.test: Make the flag public. Finish porting tester changes to fuzzer.

[factor.git] / unmaintained / tangle / menu / menu.factor

diff --git a/unmaintained/tangle/menu/menu.factor b/unmaintained/tangle/menu/menu.factor
index 9740acee1c24c39f7608cfefab057cbce095b30c..828db5dfc3904411d05e21bea583f158530f2d63 100644 (file)
--- a/unmaintained/tangle/menu/menu.factor
+++ b/unmaintained/tangle/menu/menu.factor
@@ -13,7 +13,7 @@ RELATION: before
     get-menus [ node-content = ] with find nip ;
 
 : ensure-menu ( name -- node )
-    dup get-menu [ nip ] [ create-node ] if* ;
+    dup get-menu [ ] [ create-node ] ?if ;
 
 : load-menu ( name -- menu )
     get-menu subitem-of-relation get-node-tree-s ;