Commit 39fab014 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[CSS FIX] secondary -> primary

parent fbe7be8e
...@@ -10,4 +10,4 @@ termClass CandidateTerm = "candidate-term" ...@@ -10,4 +10,4 @@ termClass CandidateTerm = "candidate-term"
termBootstrapClass :: TermList -> String termBootstrapClass :: TermList -> String
termBootstrapClass MapTerm = "success" termBootstrapClass MapTerm = "success"
termBootstrapClass StopTerm = "danger" termBootstrapClass StopTerm = "danger"
termBootstrapClass CandidateTerm = "secondary" termBootstrapClass CandidateTerm = "primary"
...@@ -300,7 +300,7 @@ viewTypeSelectorCpt = R.hooksComponentWithModule thisModule "viewTypeSelector" c ...@@ -300,7 +300,7 @@ viewTypeSelectorCpt = R.hooksComponentWithModule thisModule "viewTypeSelector" c
] ]
viewTypeButton viewType (state /\ setState) = viewTypeButton viewType (state /\ setState) =
H.button { className: "btn btn-secondary" <> active H.button { className: "btn btn-primary" <> active
, on: { click: onClick } , on: { click: onClick }
, type: "button" , type: "button"
} [ } [
......
...@@ -181,7 +181,7 @@ searchBar (query /\ setQuery) = R.createElement el {} [] ...@@ -181,7 +181,7 @@ searchBar (query /\ setQuery) = R.createElement el {} []
searchButton (queryText /\ _) = searchButton (queryText /\ _) =
H.button { type: "submit" H.button { type: "submit"
, className: "btn btn-secondary" , className: "btn btn-primary"
, on: {click: \e -> setQuery $ const queryText}} , on: {click: \e -> setQuery $ const queryText}}
[ H.span {className: "fa fa-search"} [] ] [ H.span {className: "fa fa-search"} [] ]
......
...@@ -90,7 +90,7 @@ forestCpt = R.hooksComponentWithModule thisModule "forest" cpt ...@@ -90,7 +90,7 @@ forestCpt = R.hooksComponentWithModule thisModule "forest" cpt
plus :: Handed -> R.Setter Boolean -> R.State (Maybe Backend) -> R.Element plus :: Handed -> R.Setter Boolean -> R.State (Maybe Backend) -> R.Element
plus handed showLogin backend = H.div { className: "row" } [ plus handed showLogin backend = H.div { className: "row" } [
H.button { className: "btn btn-secondary col-5 " <> if handed == RightHanded then "ml-1 mr-auto" else "ml-auto mr-1" H.button { className: "btn btn-primary col-5 " <> if handed == RightHanded then "ml-1 mr-auto" else "ml-auto mr-1"
, on: {click} , on: {click}
, title: "Add or remove connections to the server(s)." , title: "Add or remove connections to the server(s)."
} }
......
...@@ -220,7 +220,7 @@ tableContainerCpt { dispatch ...@@ -220,7 +220,7 @@ tableContainerCpt { dispatch
, H.button { className: "btn btn-primary" , H.button { className: "btn btn-primary"
, on: {click: (const $ dispatch AddTermChildren)} , on: {click: (const $ dispatch AddTermChildren)}
} [H.text "Save"] } [H.text "Save"]
, H.button { className: "btn btn-secondary" , H.button { className: "btn btn-primary"
, on: {click: (const $ dispatch $ SetParentResetChildren Nothing)} , on: {click: (const $ dispatch $ SetParentResetChildren Nothing)}
} [H.text "Cancel"] } [H.text "Cancel"]
] ]
......
...@@ -95,7 +95,7 @@ corpusLayoutViewCpt = R.hooksComponentWithModule thisModule "corpusLayoutView" c ...@@ -95,7 +95,7 @@ corpusLayoutViewCpt = R.hooksComponentWithModule thisModule "corpusLayoutView" c
pure $ H.div {} pure $ H.div {}
[ H.div { className: "row" } [ H.div { className: "row" }
[ H.div { className: "btn btn-secondary " <> (saveEnabled fieldsWithIndex fieldsS) [ H.div { className: "btn btn-primary " <> (saveEnabled fieldsWithIndex fieldsS)
, on: { click: onClickSave {fields: fieldsS, nodeId, reload, session} } , on: { click: onClickSave {fields: fieldsS, nodeId, reload, session} }
} }
[ H.span { className: "fa fa-floppy-o" } [ ] [ H.span { className: "fa fa-floppy-o" } [ ]
...@@ -106,7 +106,7 @@ corpusLayoutViewCpt = R.hooksComponentWithModule thisModule "corpusLayoutView" c ...@@ -106,7 +106,7 @@ corpusLayoutViewCpt = R.hooksComponentWithModule thisModule "corpusLayoutView" c
, nodeId , nodeId
, session } [] ] , session } [] ]
, H.div { className: "row" } , H.div { className: "row" }
[ H.div { className: "btn btn-secondary" [ H.div { className: "btn btn-primary"
, on: { click: onClickAdd fieldsS } , on: { click: onClickAdd fieldsS }
} }
[ H.span { className: "fa fa-plus" } [ ] [ H.span { className: "fa fa-plus" } [ ]
...@@ -238,13 +238,13 @@ fieldCodeEditorWrapperCpt = R.hooksComponentWithModule thisModule "fieldCodeEdit ...@@ -238,13 +238,13 @@ fieldCodeEditorWrapperCpt = R.hooksComponentWithModule thisModule "fieldCodeEdit
moveButtons = [] <> (if canMoveDown then [moveDownButton] else []) moveButtons = [] <> (if canMoveDown then [moveDownButton] else [])
<> (if canMoveUp then [moveUpButton] else []) <> (if canMoveUp then [moveUpButton] else [])
moveDownButton = moveDownButton =
H.div { className: "btn btn-secondary" H.div { className: "btn btn-primary"
, on: { click: \_ -> onMoveDown unit } , on: { click: \_ -> onMoveDown unit }
} [ } [
H.span { className: "fa fa-arrow-down" } [ ] H.span { className: "fa fa-arrow-down" } [ ]
] ]
moveUpButton = moveUpButton =
H.div { className: "btn btn-secondary" H.div { className: "btn btn-primary"
, on: { click: \_ -> onMoveUp unit } , on: { click: \_ -> onMoveUp unit }
} [ } [
H.span { className: "fa fa-arrow-up" } [ ] H.span { className: "fa fa-arrow-up" } [ ]
......
...@@ -108,7 +108,7 @@ dashboardLayoutLoadedCpt = R.hooksComponentWithModule thisModule "dashboardLayou ...@@ -108,7 +108,7 @@ dashboardLayoutLoadedCpt = R.hooksComponentWithModule thisModule "dashboardLayou
where where
addNew = H.div { className: "row" } [ addNew = H.div { className: "row" } [
H.span { className: "btn btn-secondary" H.span { className: "btn btn-primary"
, on: { click: onClickAddChart }} [ H.span { className: "fa fa-plus" } [] ] , on: { click: onClickAddChart }} [ H.span { className: "fa fa-plus" } [] ]
] ]
where where
...@@ -151,7 +151,7 @@ dashboardCodeEditorCpt = R.hooksComponentWithModule thisModule "dashboardCodeEdi ...@@ -151,7 +151,7 @@ dashboardCodeEditorCpt = R.hooksComponentWithModule thisModule "dashboardCodeEdi
pure $ R.fragment pure $ R.fragment
[ H.div { className: "row" } [ H.div { className: "row" }
[ H.div { className: "btn btn-secondary " <> (saveEnabled fieldsWithIndex fieldsS) [ H.div { className: "btn btn-primary " <> (saveEnabled fieldsWithIndex fieldsS)
, on: { click: onClickSave fieldsS } , on: { click: onClickSave fieldsS }
} }
[ H.span { className: "fa fa-floppy-o" } [ ] [ H.span { className: "fa fa-floppy-o" } [ ]
...@@ -165,7 +165,7 @@ dashboardCodeEditorCpt = R.hooksComponentWithModule thisModule "dashboardCodeEdi ...@@ -165,7 +165,7 @@ dashboardCodeEditorCpt = R.hooksComponentWithModule thisModule "dashboardCodeEdi
] ]
] ]
, H.div { className: "row" } , H.div { className: "row" }
[ H.div { className: "btn btn-secondary" [ H.div { className: "btn btn-primary"
, on: { click: onClickAddField fieldsS } , on: { click: onClickAddField fieldsS }
} }
[ H.span { className: "fa fa-plus" } [ ] [ H.span { className: "fa fa-plus" } [ ]
......
...@@ -103,7 +103,7 @@ fileLayoutLoadedCpt = R.hooksComponentWithModule thisModule "fileLayoutLoaded" c ...@@ -103,7 +103,7 @@ fileLayoutLoadedCpt = R.hooksComponentWithModule thisModule "fileLayoutLoaded" c
H.h2 {} [ H.text hyperdata.name ] H.h2 {} [ H.text hyperdata.name ]
] ]
, H.div { className: "row" } [ , H.div { className: "row" } [
H.div { className: "btn btn-secondary" } [ H.div { className: "btn btn-primary" } [
H.a { href: toUrl session ("node/" <> show nodeId <> "/file/download") H.a { href: toUrl session ("node/" <> show nodeId <> "/file/download")
, target: "_blank" , target: "_blank"
} [ H.text "Download" ] } [ H.text "Download" ]
......
...@@ -158,11 +158,11 @@ tableau (PublicData {title, abstract, img, url, date, database, author}) = ...@@ -158,11 +158,11 @@ tableau (PublicData {title, abstract, img, url, date, database, author}) =
[ H.div { className: "btn-group" } [ H.div { className: "btn-group" }
[ [
{- TODO {- TODO
H.button { className : "btn btn-secondary flex-between" H.button { className : "btn btn-primary flex-between"
, href : url , href : url
, role : "button" , role : "button"
} [ H.text "View the map" ] } [ H.text "View the map" ]
, H.button { className : "btn btn-secondary flex-start" , H.button { className : "btn btn-primary flex-start"
, href : url , href : url
, role : "button" , role : "button"
} [ H.text "More like this" ] } [ H.text "More like this" ]
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment