summaryrefslogtreecommitdiff
path: root/models/nutrient.rkt
diff options
context:
space:
mode:
authorMarius Peter <dev@marius-peter.com>2025-11-24 16:00:33 +0100
committerMarius Peter <dev@marius-peter.com>2025-11-24 16:00:33 +0100
commit79f77ce511bb7ad515fb57156982b8a0bd28087b (patch)
tree2dad8a70f582438439ce1c1db000078b3d3c529b /models/nutrient.rkt
parent0f0cc5b4d3b72534139a43d56736a2dcf7f21f04 (diff)
Wrap SQL query blocks with with-tx.
Diffstat (limited to 'models/nutrient.rkt')
-rw-r--r--models/nutrient.rkt2
1 files changed, 1 insertions, 1 deletions
diff --git a/models/nutrient.rkt b/models/nutrient.rkt
index fd78cc8..07fb4fd 100644
--- a/models/nutrient.rkt
+++ b/models/nutrient.rkt
@@ -47,7 +47,7 @@
(define (create-nutrient! canonical-name french-name formula)
(or (get-nutrient #:name canonical-name #:formula formula)
- (begin
+ (with-tx
(query-exec (current-conn)
(insert #:into nutrients
#:set [canonical_name ,canonical-name]
Copyright 2019--2026 Marius PETER