# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1580987621 -3600
# Node ID 34586cf7ecbdde7e415a7d802c3c4d4daacc3e08
# Parent  e9155e18dfb4af42f440292155c051ad650ebdb5
#BUGFIX by cg
class: SequenceView
changed:
	#enabled:
	#invalidate
	#invalidate:
	#invalidate:repairNow:
	#invalidateDeviceRectangle:repairNow:
	#invalidateRepairNow:

diff -r e9155e18dfb4 -r 34586cf7ecbd SequenceView.st
--- a/SequenceView.st	Wed Feb 05 13:55:04 2020 +0100
+++ b/SequenceView.st	Thu Feb 06 12:13:41 2020 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1997 by eXept Software AG
               All Rights Reserved
@@ -96,7 +98,7 @@
 enabled:aBoolean
     "senders assume that I am the listView - not a wrapper"
 
-    scrolledView enabled:aBoolean
+    scrolledView notNil ifTrue:[ scrolledView enabled:aBoolean ]
 !
 
 font:aFont
@@ -111,31 +113,31 @@
 invalidate
     "senders assume that I am the listView - not a wrapper"
 
-    scrolledView invalidate
+    scrolledView notNil ifTrue:[ scrolledView invalidate ]
 !
 
 invalidate:aRectangle
     "senders assume that I am the listView - not a wrapper"
 
-    scrolledView invalidate:aRectangle
+    scrolledView notNil ifTrue:[ scrolledView invalidate:aRectangle ]
 !
 
 invalidate:aRectangle repairNow:doRepair
     "senders assume that I am the listView - not a wrapper"
 
-    scrolledView invalidate:aRectangle repairNow:doRepair
+    scrolledView notNil ifTrue:[ scrolledView invalidate:aRectangle repairNow:doRepair ]
 !
 
 invalidateDeviceRectangle:aRectangle repairNow:doRepair
     "senders assume that I am the listView - not a wrapper"
 
-    scrolledView invalidateDeviceRectangle:aRectangle repairNow:doRepair
+    scrolledView notNil ifTrue:[ scrolledView invalidateDeviceRectangle:aRectangle repairNow:doRepair ]
 !
 
 invalidateRepairNow:doRepair
     "senders assume that I am the listView - not a wrapper"
 
-    scrolledView invalidateRepairNow:doRepair
+    scrolledView notNil ifTrue:[ scrolledView invalidateRepairNow:doRepair ]
 ! !
 
 !SequenceView class methodsFor:'documentation'!