--- a/ScrollableView.st	Fri Jul 09 06:12:56 2021 +0100
+++ b/ScrollableView.st	Thu Jul 01 21:44:12 2021 +0100
@@ -1,5 +1,6 @@
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
+ COPYRIGHT (c) 2021 LabWare
               All Rights Reserved
 
  This software is furnished under a license and may be used
@@ -32,6 +33,7 @@
 copyright
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
+ COPYRIGHT (c) 2021 LabWare
               All Rights Reserved
 
  This software is furnished under a license and may be used
@@ -1989,6 +1991,8 @@
      (to avoid thick borders in-between components).
      This is very questionable, since borders are only used with 2D styles,
      and those 2D styles are more-or-less obsolete anyway.
+
+     JV @ 2021-01-07: Not really, they're coming back into the fashion again :-)
      "
 
     |usedScrolledViewHMargin usedScrolledViewVMargin 
@@ -2015,7 +2019,7 @@
     |
 
     sBd := 0.
-    DefaultScrolledViewBorderWidth notNil ifTrue:[
+    (DefaultScrolledViewBorderWidth notNil and:[DefaultScrolledViewBorderWidth ~~ 0]) ifTrue:[
         sBd := DefaultScrolledViewBorderWidth.
         scrolledView notNil ifTrue:[
             scrolledView borderWidth:DefaultScrolledViewBorderWidth.
@@ -2202,8 +2206,10 @@
 "/        ]
     ].
 
-    "Created: / 21.5.1998 / 00:48:35 / cg"
-    "Modified: / 11.2.2000 / 00:00:36 / cg"
+    "Created: / 21-05-1998 / 00:48:35 / cg"
+    "Modified: / 11-02-2000 / 00:00:36 / cg"
+    "Modified: / 30-06-2021 / 20:35:06 / Jan Vrany <jan.vrany@labware.com>"
+    "Modified (comment): / 01-07-2021 / 21:24:51 / Jan Vrany <jan.vrany@labware.com>"
 !
 
 usedScrollBarHSpacingWhenHasV:hasV andHasH:hasH
@@ -2510,5 +2516,10 @@
 
 version_CVS
     ^ '$Header$'
+!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
 ! !