Updating code for make and fry changes

[factor.git] / basis / furnace / actions / actions.factor

diff --git a/basis/furnace/actions/actions.factor b/basis/furnace/actions/actions.factor
index 1370ae95b2f02653e6d201e0ce138f328bbca688..cce098f208cfe9ab5c018eec2cf176a46d953f84 100755 (executable)
--- a/basis/furnace/actions/actions.factor
+++ b/basis/furnace/actions/actions.factor
@@ -60,7 +60,7 @@ TUPLE: action rest authorize init display validate submit ;
 \r
 : handle-get ( action -- response )\r
     '[\r
-        , dup display>> [\r
+        _ dup display>> [\r
             {\r
                 [ init>> call ]\r
                 [ authorize>> call ]\r
@@ -90,7 +90,7 @@ TUPLE: action rest authorize init display validate submit ;
 \r
 : handle-post ( action -- response )\r
     '[\r
-        , dup submit>> [\r
+        _ dup submit>> [\r
             [ validate>> call ]\r
             [ authorize>> call ]\r
             [ submit>> call ]\r
@@ -133,4 +133,4 @@ TUPLE: page-action < action template ;
 \r
 : <page-action> ( -- page )\r
     page-action new-action\r
-        dup '[ , template>> <chloe-content> ] >>display ;\r
+        dup '[ _ template>> <chloe-content> ] >>display ;\r