summaryrefslogtreecommitdiff
path: root/pages/shop/cart/remove.fnl
diff options
context:
space:
mode:
Diffstat (limited to 'pages/shop/cart/remove.fnl')
-rw-r--r--pages/shop/cart/remove.fnl9
1 files changed, 3 insertions, 6 deletions
diff --git a/pages/shop/cart/remove.fnl b/pages/shop/cart/remove.fnl
index d5e3531..0cdc417 100644
--- a/pages/shop/cart/remove.fnl
+++ b/pages/shop/cart/remove.fnl
@@ -1,16 +1,13 @@
(local lib (require :lib))
+(local shop (require :shop))
(fn render [request db]
(if (= request.method "POST")
- (let [order-id (lib.order-id request)]
+ (let [order-id (shop.order-id request)]
(if (and order-id request.body)
(do
(local body-values (lib.parse-values request.body))
- (_G.must
- (luna.db.exec
- db
- "DELETE FROM order_lines WHERE id = ? AND order_id = ?"
- [body-values.id order-id]))
+ (shop.delete-order-line db body-values.id)
(values
302
{:Location (_G.must