# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1524322721 -7200
# Node ID 3b3ccfdbb153178eda1a2384a6524d17d8bcd07a
# Parent  da16573a2e642552f536fafa25623728ed07dd6e
#FEATURE by cg
class: ScrollableView
added: #repairDamage

diff -r da16573a2e64 -r 3b3ccfdbb153 ScrollableView.st
--- a/ScrollableView.st	Thu Apr 19 12:24:32 2018 +0200
+++ b/ScrollableView.st	Sat Apr 21 16:58:41 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -1455,6 +1457,12 @@
     ]    
 !
 
+repairDamage
+    scrolledView repairDamage.
+    hScrollBar notNil ifTrue:[ hScrollBar repairDamage ].
+    vScrollBar notNil ifTrue:[ vScrollBar repairDamage ].
+!
+
 requestAutoAccept
     "request to accept: this is invoked when a dialog closes via accept or cancel.
      This forces my value to be accepted into my model.