--- a/Tools__CodeView2.st	Mon Jun 21 13:50:38 2021 +0100
+++ b/Tools__CodeView2.st	Thu Jul 01 21:53:15 2021 +0100
@@ -1,6 +1,7 @@
 "
  COPYRIGHT (c) 2010 by Jan Vrany, SWING Research Group. CTU in Prague
  COPYRIGHT (c) 2015-2018 Jan Vrany
+ COPYRIGHT (c) 2021 LabWare
               All Rights Reserved
 
 Permission is hereby granted, free of charge, to any person
@@ -73,6 +74,7 @@
 "
  COPYRIGHT (c) 2010 by Jan Vrany, SWING Research Group. CTU in Prague
  COPYRIGHT (c) 2015-2018 Jan Vrany
+ COPYRIGHT (c) 2021 LabWare
               All Rights Reserved
 
 Permission is hereby granted, free of charge, to any person
@@ -1664,6 +1666,21 @@
     "Created: / 22-07-2013 / 13:57:40 / cg"
 !
 
+initStyle
+    | borderWidth borderColor |
+    super initStyle.
+
+    borderWidth := styleSheet at:'text.borderWidth' default: 0.
+    borderWidth ~~ 0 ifTrue: [
+        borderColor := styleSheet colorAt:'text.borderColor' default: nil.
+        borderColor notNil ifTrue: [ 
+            self border:(SimpleBorder width:borderWidth color:borderColor)
+        ].
+    ].
+
+    "Created: / 01-07-2021 / 21:49:05 / Jan Vrany <jan.vrany@labware.com>"
+!
+
 initialize
     "Invoked when a new instance is created."
     "Call super initialize"