From 300f6665056c664a2db9437ecf2e6dae3c224c52 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sat, 2 Sep 2023 21:29:07 -0700
Subject: [PATCH] recipes: move define-db out of a top-level form

---
 extra/recipes/recipes.factor | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/extra/recipes/recipes.factor b/extra/recipes/recipes.factor
index 1722c0d1fc..67e2b8b3b8 100644
--- a/extra/recipes/recipes.factor
+++ b/extra/recipes/recipes.factor
@@ -14,7 +14,8 @@ STORED-TUPLE: recipe
 : <recipe> ( title genre text -- recipe )
     recipe new swap >>txt swap >>genre swap >>title 0 >>votes ;
 
-"recipes.db" temp-file <sqlite-db> recipe define-db
+: init-recipe-db ( -- )
+    "recipes.db" temp-file <sqlite-db> recipe define-db ;
 
 : top-recipes ( offset search -- recipes )
     <query> T{ recipe } rot >>title >>tuple
@@ -73,4 +74,4 @@ STORED-TUPLE: recipe
 
 MAIN-WINDOW: recipe-browser
     { { title "Recipes" } }
-    <recipe-gadget> >>gadgets ;
+    init-recipe-db <recipe-gadget> >>gadgets ;
-- 
2.34.1