Skip to content

Commit

Permalink
Work in progress
Browse files Browse the repository at this point in the history
  • Loading branch information
RaphaelGauthier committed Sep 12, 2023
1 parent 19ed0e3 commit 06d6966
Show file tree
Hide file tree
Showing 2 changed files with 20 additions and 17 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -56,7 +56,7 @@ type alias Directive =
, system : Bool
, policyMode : String
, tags : List Tag
}
}

type alias Technique =
{ name : String
Expand Down Expand Up @@ -165,7 +165,6 @@ type alias BlockCompliance value =
, components : List (ComponentCompliance value)
}


type alias ComponentValueCompliance value =
{ component : String
, compliance : Float
Expand Down Expand Up @@ -253,6 +252,10 @@ type alias TableFilters =
, sortOrder : SortOrder
, filter : String
, unfolded : List String
, hideAllCompliant : Bool
, openComplianceFilters : Bool
, selectedComplianceStatus : List String
, showOrHideStatus : Bool
}

type alias TreeFilters =
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -390,7 +390,8 @@ directivesTab model details =
, div [class "table-header"]
[ input [type_ "text", placeholder "Filter", class "input-sm form-control", value model.ui.directiveFilters.tableFilters.filter
, onInput (\s -> UpdateDirectiveFilters {directiveFilters | tableFilters = {tableFilters | filter = s}} )][]
, button [class "btn btn-default", onCustomClick (RefreshComplianceTable rule.id)][i [class "fa fa-refresh"][]]
, button [class "btn btn-default btn-sm", onCustomClick (RefreshComplianceTable rule.id)][i [class "fa fa-refresh"][]]
,
]
, div[class "table-container"] [(
let
Expand Down Expand Up @@ -439,20 +440,19 @@ directivesTab model details =
else
sortedDirectives
|> List.map (\d ->
tr []
[ td[]
[
a []
[ badgePolicyMode model.policyMode d.policyMode
, span [class "item-name tooltipable"][text d.displayName]
, buildTagsTree d.tags
, div [class "treeActions-container"]
[ span [class "treeActions"][ span [class "tooltipable fa action-icon accept"][]]
]
, goToBtn (getDirectiveLink model.contextPath d.id)
]
]
])
tr []
[ td[]
[ a []
[ badgePolicyMode model.policyMode d.policyMode
, span [class "item-name tooltipable"][text d.displayName]
, buildTagsTree d.tags
, div [class "treeActions-container"]
[ span [class "treeActions"][ span [class "tooltipable fa action-icon accept"][]]
]
, goToBtn (getDirectiveLink model.contextPath d.id)
]
]
])
)
]
)]
Expand Down

0 comments on commit 06d6966

Please sign in to comment.