next

cardano-tracer/src/Cardano/Tracer/Handlers/RTView/UI/CSS/Own.hs

@@ -204,6 +204,11 @@ span[data-tooltip] {
   margin-top: 6px;
 }
 
+.rt-view-search-errors-icon svg {
+  width: 18px;
+  color: whitesmoke;
+}
+
 .rt-view-notifications-errors-select-wrapper {
   padding-top: 7px;
   padding-bottom: 11px;
@@ -324,12 +329,6 @@ span[data-tooltip] {
   cursor: pointer;
 }
 
-.dark .rt-view-search-errors-icon svg {
-  width: 18px;
-  color: whitesmoke;
-  cursor: pointer;
-}
-
 .dark .rt-view-logs-icon svg {
   width: 23px;
   padding-top: 2px;
@@ -443,6 +442,13 @@ span[data-tooltip] {
   display: block;
 }
 
+.dark .rt-view-notification-settings-foot {
+  color: whitesmoke;
+  background-color: #282841;
+  border-top: 1px solid #555;
+  display: block;
+}
+
 .dark .rt-view-notifications-title {
   color: whitesmoke;
 }
@@ -604,6 +610,7 @@ span[data-tooltip] {
 .dark .rt-view-label {
   font-size: 80%;
   font-weight: 600;
+  color: whitesmoke;
 }
 
 .dark .rt-view-test-status-message-ok {
@@ -723,13 +730,7 @@ span[data-tooltip] {
   width: 29px;
   margin-top: 5px;
   margin-right: 5px;
-  color: #444;
-  cursor: pointer;
-}
-
-.light .rt-view-search-errors-icon svg {
-  width: 18px;
-  color: #444;
+  color: #0033ad;
   cursor: pointer;
 }
 
@@ -839,6 +840,13 @@ span[data-tooltip] {
   display: block;
 }
 
+.light .rt-view-notification-settings-foot {
+  color: #555;
+  background-color: whitesmoke;
+  border-top: 1px solid #bebebe;
+  display: block;
+}
+
 .light .rt-view-notifications-title {
   color: #444;
 }
@@ -1007,6 +1015,7 @@ span[data-tooltip] {
 .light .rt-view-label {
   font-size: 80%;
   font-weight: 600;
+  color: #555;
 }
 
 .light .rt-view-test-status-message-ok {

cardano-tracer/src/Cardano/Tracer/Handlers/RTView/Update/NodeInfo.hs

@@ -57,12 +57,10 @@ askNSetNodeInfo window dpRequestors newlyConnected displayedElements =
 
   setProtocol p id' = do
     justCleanText id'
-    let byronTag   = UI.span #. "tag is-warning is-rounded is-medium" # set text "Byron"
-        shelleyTag = UI.span #. "tag is-info is-rounded is-medium ml-3" # set text "Shelley"
     case p of
-      "Byron"   -> findAndAdd [byronTag] window id'
-      "Shelley" -> findAndAdd [shelleyTag] window id'
-      _         -> findAndAdd [byronTag, shelleyTag] window id'
+      "Byron"   -> setTextValue id' "Byron"
+      "Shelley" -> setTextValue id' "Shelley"
+      _         -> setTextValue id' "Cardano"
 
   setTime ts id' = do
     justCleanText id'