Refactor 'measured-on' to 'measurement-date'.

2 files changed, 4 insertions, 4 deletions

diff --git a/db/migrations.rkt b/db/migrations.rkt
index d07b130..a312623 100644
--- a/db/migrations.rkt
+++ b/db/migrations.rkt
@@ -111,9 +111,9 @@
                   (list (create-table #:if-not-exists nutrient_measurements
                                       #:columns [id integer #:not-null]
                                       ;; ISO8601 date
-                                      [measured_on text #:not-null]
+                                      [measurement_date text #:not-null]
                                       #:constraints (primary-key id)
-                                      (unique measured_on))))
+                                      (unique measurement_date))))
 
 (define-migration "create table nutrient_targets"
                   (list (create-table #:if-not-exists nutrient_targets
diff --git a/db/seed.rkt b/db/seed.rkt
index 7530651..25d7ee3 100644
--- a/db/seed.rkt
+++ b/db/seed.rkt
@@ -51,14 +51,14 @@
   (define header (next-row))
   (define (row->seed! row)
     (define row-alist (map cons header row))
-    (define measured-on (cdr (first row-alist)))
+    (define measurement-date (cdr (first row-alist)))
     (define nutrient-values
       (for/hash ([nm (in-list (cdr row-alist))])
         (define formula (car nm))
         (define n (get-nutrient #:formula formula))
         (define v (string->number (cdr nm)))
         (values n v)))
-    (create-nutrient-measurement! measured-on nutrient-values))
+    (create-nutrient-measurement! measurement-date nutrient-values))
   (with-tx (csv-for-each row->seed! next-row)))
 
 (define (seed-crops!)