Theming: add support for theming navigation service's styles jv
authorJan Vrany <jan.vrany@labware.com>
Wed, 15 Sep 2021 21:38:11 +0100
branchjv
changeset 6853 08ec6f06d76f
parent 6852 fa1eaaf3f69f
child 6854 1f5ae7573af6
Theming: add support for theming navigation service's styles ...such as background for selected variable, selector or assignment.
CodeViewTheme.st
--- a/CodeViewTheme.st	Thu Aug 19 23:29:36 2021 +0100
+++ b/CodeViewTheme.st	Wed Sep 15 21:38:11 2021 +0100
@@ -1,5 +1,6 @@
 "
  COPYRIGHT (c) 2018 Jan Vrany
+ COPYRIGHT (c) 2021 LabWare
               All Rights Reserved
 
  This software is furnished under a license and may be used
@@ -25,6 +26,7 @@
 copyright
 "
  COPYRIGHT (c) 2018 Jan Vrany
+ COPYRIGHT (c) 2021 LabWare
               All Rights Reserved
 
  This software is furnished under a license and may be used
@@ -92,12 +94,6 @@
     "Modified: / 20-12-2017 / 22:12:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-assignmentHighlightEmphasis
-    ^ Array with:(#backgroundColor -> Color lightGray)
-
-    "Created: / 15-12-2017 / 22:37:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
 badIdentifierColor
     "the color used for illegal identifiers;
      If syntaxColoring is turned on."
@@ -906,6 +902,43 @@
     "Created: / 17-02-2011 / 14:18:01 / cg"
 ! !
 
+!CodeViewTheme methodsFor:'styles - navigation'!
+
+assignmentHighlightBackround
+    ^ self variableHighlightBackground
+
+    "Created: / 15-09-2021 / 21:28:41 / Jan Vrany <jan.vrany@labware.com>"
+!
+
+assignmentHighlightEmphasis
+    ^ Array with:(#backgroundColor -> self assignmentHighlightBackround)
+
+    "Created: / 15-12-2017 / 22:49:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-09-2021 / 21:27:31 / Jan Vrany <jan.vrany@labware.com>"
+!
+
+selectorHighlightBackground
+    ^ Color blue lighter lighter
+!
+
+selectorHighlightEmphasis
+    ^ Array with:(#backgroundColor ->self selectorHighlightBackground)
+
+    "Created: / 15-12-2017 / 22:49:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-09-2021 / 21:30:06 / Jan Vrany <jan.vrany@labware.com>"
+!
+
+variableHighlightBackground
+    ^ Color lightGray
+!
+
+variableHighlightEmphasis
+    ^ Array with:(#backgroundColor -> self variableHighlightBackground)
+
+    "Created: / 15-12-2017 / 22:49:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-09-2021 / 21:29:47 / Jan Vrany <jan.vrany@labware.com>"
+! !
+
 !CodeViewTheme class methodsFor:'documentation'!
 
 version_HG