Skip to content
Snippets Groups Projects
Commit d1f99423 authored by Allen Gilliland's avatar Allen Gilliland
Browse files

fix up database migration so that we get a proper NOT NULL column with the...

fix up database migration so that we get a proper NOT NULL column with the default value we want.  also some unit test fixes.
parent d662a5dd
No related branches found
No related tags found
No related merge requests found
......@@ -9,15 +9,27 @@ databaseChangeLog:
- column:
name: parameters
type: text
value: []
constraints:
nullable: true
deferrable: false
initiallyDeferred: false
- addNotNullConstraint:
columnDataType: text
columnName: parameters
defaultNullValue: '[]'
tableName: report_dashboard
- addColumn:
tableName: report_dashboardcard
columns:
- column:
name: parameter_mappings
type: text
value: []
constraints:
nullable: true
deferrable: false
initiallyDeferred: false
- addNotNullConstraint:
columnDataType: text
columnName: parameter_mappings
defaultNullValue: '[]'
tableName: report_dashboardcard
......@@ -48,7 +48,7 @@
(->> (db/insert! Dashboard
:name name
:description description
:parameters parameters
:parameters (or parameters [])
:public_perms public_perms
:creator_id user-id)
(events/publish-event :dashboard-create)))
......
......@@ -18,9 +18,9 @@
(let [get-dashboard-count (fn [] (dashboard-count (Card card-id)))]
[(get-dashboard-count)
(do (db/insert! DashboardCard :card_id card-id, :dashboard_id (:id (create-dash (random-name))))
(do (db/insert! DashboardCard :card_id card-id, :dashboard_id (:id (create-dash (random-name))), :parameter_mappings [])
(get-dashboard-count))
(do (db/insert! DashboardCard :card_id card-id, :dashboard_id (:id (create-dash (random-name))))
(do (db/insert! DashboardCard :card_id card-id, :dashboard_id (:id (create-dash (random-name))), :parameter_mappings [])
(get-dashboard-count))])))
......
......@@ -32,10 +32,11 @@
:sizeY 2
:col nil
:row nil
:parameter_mappings [{:foo "bar"}]
:series []}
(tu/with-temp* [Dashboard [{dashboard-id :id}]
Card [{card-id :id}]
DashboardCard [{dashcard-id :id} {:dashboard_id dashboard-id, :card_id card-id}]]
DashboardCard [{dashcard-id :id} {:dashboard_id dashboard-id, :card_id card-id, :parameter_mappings [{:foo "bar"}]}]]
(remove-ids-and-timestamps (retrieve-dashboard-card dashcard-id))))
;; retrieve-dashboard-card
......@@ -45,6 +46,7 @@
:sizeY 2
:col nil
:row nil
:parameter_mappings []
:series [{:name "Additional Series Card 1"
:description nil
:display :table
......@@ -98,6 +100,7 @@
:sizeY 3
:col 1
:row 1
:parameter_mappings [{:foo "bar"}]
:series [{:name "Test Card"
:description nil
:display :table
......@@ -107,6 +110,7 @@
:sizeY 3
:col 1
:row 1
:parameter_mappings [{:foo "bar"}]
:series [{:name "Test Card"
:description nil
:display :table
......@@ -121,6 +125,7 @@
:sizeY 3
:row 1
:col 1
:parameter_mappings [{:foo "bar"}]
:series [card-id]})]
;; first result is return value from function, second is to validate db captured everything
[(remove-ids-and-timestamps dashboard-card)
......@@ -137,11 +142,13 @@
:sizeY 2
:col nil
:row nil
:parameter_mappings [{:foo "bar"}]
:series []}
{:sizeX 4
:sizeY 3
:col 1
:row 1
:parameter_mappings [{:foo "barbar"}]
:series [{:name "Test Card 2"
:description nil
:display :table
......@@ -156,6 +163,7 @@
:sizeY 3
:col 1
:row 1
:parameter_mappings [{:foo "barbar"}]
:series [{:name "Test Card 2"
:description nil
:display :table
......@@ -168,7 +176,7 @@
:visualization_settings {}}]}]
(tu/with-temp* [Dashboard [{dashboard-id :id}]
Card [{card-id :id}]
DashboardCard [{dashcard-id :id} {:dashboard_id dashboard-id, :card_id card-id}]
DashboardCard [{dashcard-id :id} {:dashboard_id dashboard-id, :card_id card-id, :parameter_mappings [{:foo "bar"}]}]
Card [{card-id-1 :id} {:name "Test Card 1"}]
Card [{card-id-2 :id} {:name "Test Card 2"}]]
;; first result is the unmodified dashcard
......@@ -183,5 +191,6 @@
:sizeY 3
:row 1
:col 1
:parameter_mappings [{:foo "barbar"}]
:series [card-id-2 card-id-1]}))
(remove-ids-and-timestamps (retrieve-dashboard-card dashcard-id))]))
......@@ -69,7 +69,7 @@
;; date range substitution
(expect
(let [yesterday "2016-05-23"]
(let [yesterday (tf/unparse (tf/formatters :year-month-day) (t/yesterday))]
{:database 1
:type :native
:native {:query (str "SELECT * FROM table WHERE date BETWEEN '" yesterday "' AND '" yesterday "'")}})
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment