diff options
Diffstat (limited to 'models/crop.rkt')
| -rw-r--r-- | models/crop.rkt | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/models/crop.rkt b/models/crop.rkt index d1d2159..eff54a3 100644 --- a/models/crop.rkt +++ b/models/crop.rkt @@ -25,9 +25,8 @@ (define (create-crop! name) (or (get-crop #:name name) - (with-tx - (query-exec (current-conn) (insert #:into crops #:set [canonical_name ,name])) - (get-crop #:name name)))) + (with-tx (query-exec (current-conn) (insert #:into crops #:set [canonical_name ,name])) + (get-crop #:name name)))) ;; READ |