diff --git a/webapp/sources/rudder/rudder-web/src/main/elm/sources/DirectiveCompliance/ViewUtils.elm b/webapp/sources/rudder/rudder-web/src/main/elm/sources/DirectiveCompliance/ViewUtils.elm
index 5c9020b79d..02fc83c7d6 100644
--- a/webapp/sources/rudder/rudder-web/src/main/elm/sources/DirectiveCompliance/ViewUtils.elm
+++ b/webapp/sources/rudder/rudder-web/src/main/elm/sources/DirectiveCompliance/ViewUtils.elm
@@ -80,7 +80,7 @@ valueCompliance complianceFilters =
     (\ _ _ _ -> [])
     (\_ i -> i)
     [ ("Value"   , .value   >> (\v -> div[class "value-container font-monospace"][text v]), (\d1 d2 -> N.compare d1.value  d2.value))
-    , ("Messages", .reports >> List.filter (filterReports complianceFilters) >> List.map (\r -> Maybe.withDefault "" r.message) >> List.map (\t -> text t) >> List.intersperse (br [] []) >> (\ls -> div[class "value-container font-monospace"] ls ), (\d1 d2 -> N.compare d1.value d2.value) )
+    , ("Messages", .reports >> List.filter (filterReports complianceFilters) >> List.map (\r -> Maybe.withDefault "" r.message) >> List.map (\t -> text t) >> List.intersperse (br [] []) >> (\ls -> pre[class "value-container font-monospace"] ls ), (\d1 d2 -> N.compare d1.value d2.value) )
     , ("Status"  , .reports >> List.filter (filterReports complianceFilters) >> buildComplianceReport, (\d1 d2 -> Basics.compare d1.value d2.value))
     ]
     .value
diff --git a/webapp/sources/rudder/rudder-web/src/main/elm/sources/GroupCompliance/ViewUtils.elm b/webapp/sources/rudder/rudder-web/src/main/elm/sources/GroupCompliance/ViewUtils.elm
index b8982195ec..a106bcd2a2 100644
--- a/webapp/sources/rudder/rudder-web/src/main/elm/sources/GroupCompliance/ViewUtils.elm
+++ b/webapp/sources/rudder/rudder-web/src/main/elm/sources/GroupCompliance/ViewUtils.elm
@@ -60,7 +60,7 @@ valueCompliance complianceFilters =
     (\ _ _ _ -> [])
     (\_ i -> i)
     [ ("Value"   , .value   >> (\v -> div[class "value-container font-monospace"][text v]), (\d1 d2 -> N.compare d1.value  d2.value))
-    , ("Messages", .reports >> List.filter (filterReports complianceFilters) >> List.map (\r -> Maybe.withDefault "" r.message) >> List.map (\t -> text t) >> List.intersperse (br [] []) >> (\ls -> div[class "value-container font-monospace"] ls ), (\d1 d2 -> N.compare d1.value d2.value) )
+    , ("Messages", .reports >> List.filter (filterReports complianceFilters) >> List.map (\r -> Maybe.withDefault "" r.message) >> List.map (\t -> text t) >> List.intersperse (br [] []) >> (\ls -> pre[class "value-container font-monospace"] ls ), (\d1 d2 -> N.compare d1.value d2.value) )
     , ("Status"  , .reports >> List.filter (filterReports complianceFilters) >> buildComplianceReport, (\d1 d2 -> Basics.compare d1.value d2.value))
     ]
     .value
diff --git a/webapp/sources/rudder/rudder-web/src/main/elm/sources/NodeCompliance/ViewUtils.elm b/webapp/sources/rudder/rudder-web/src/main/elm/sources/NodeCompliance/ViewUtils.elm
index 2a51bf2b49..a17390c18f 100644
--- a/webapp/sources/rudder/rudder-web/src/main/elm/sources/NodeCompliance/ViewUtils.elm
+++ b/webapp/sources/rudder/rudder-web/src/main/elm/sources/NodeCompliance/ViewUtils.elm
@@ -82,7 +82,7 @@ valueCompliance complianceFilters =
     (\ _ _ _ -> [])
     (\_ i -> i)
     [ ("Value"   , .value   >> (\v -> div[class "value-container font-monospace"][text v]), (\d1 d2 -> N.compare d1.value  d2.value))
-    , ("Messages", .reports >> List.filter (filterReports complianceFilters) >> List.map (\r -> Maybe.withDefault "" r.message) >> List.map (\t -> text t) >> List.intersperse (br [] []) >> (\ls -> div[class "value-container font-monospace"] ls ), (\d1 d2 -> N.compare d1.value d2.value) )
+    , ("Messages", .reports >> List.filter (filterReports complianceFilters) >> List.map (\r -> Maybe.withDefault "" r.message) >> List.map (\t -> text t) >> List.intersperse (br [] []) >> (\ls -> pre[class "value-container font-monospace"] ls ), (\d1 d2 -> N.compare d1.value d2.value) )
     , ("Status"  , .reports >> List.filter (filterReports complianceFilters) >> buildComplianceReport, (\d1 d2 -> Basics.compare d1.value d2.value))
     ]
     .value