Move make to its own vocabulary, remove fry _ feature

[factor.git] / extra / ui / gadgets / tabs / tabs.factor

diff --git a/extra/ui/gadgets/tabs/tabs.factor b/extra/ui/gadgets/tabs/tabs.factor
index 50e2df2e9e3ec90696702325d026f6d672fa5af8..83ed445593f73ae93416623034eeb174a0719e0d 100755 (executable)
--- a/extra/ui/gadgets/tabs/tabs.factor
+++ b/extra/ui/gadgets/tabs/tabs.factor
@@ -23,7 +23,7 @@ DEFER: (del-page)
      [ names>> ] [ model>> ] [ toggler>> ] tri\r
      [ clear-gadget ] keep\r
      [ [ length ] keep ] 2dip\r
-    '[ , _ _ , add-toggle ] 2each ;\r
+     '[ [ , ] 2dip , add-toggle ] 2each ;\r
 \r
 : refresh-book ( tabbed -- )\r
     model>> [ ] change-model ;\r