--- a/SequenceView.st	Sat Sep 30 17:34:49 2000 +0200
+++ b/SequenceView.st	Sat Sep 30 17:52:39 2000 +0200
@@ -11,6 +11,8 @@
 "
 
 
+"{ Package: 'stx:libwidg' }"
+
 ScrollableView subclass:#SequenceView
 	instanceVariableNames:''
 	classVariableNames:''
@@ -102,8 +104,40 @@
 
 ! !
 
+!SequenceView methodsFor:'misc'!
+
+invalidate
+    "senders assume that I am the listView - not a wrapper"
+
+    scrolledView invalidate
+!
+
+invalidate:aRectangle
+    "senders assume that I am the listView - not a wrapper"
+
+    scrolledView invalidate:aRectangle
+!
+
+invalidate:aRectangle repairNow:doRepair
+    "senders assume that I am the listView - not a wrapper"
+
+    scrolledView invalidate:aRectangle repairNow:doRepair
+!
+
+invalidateDeviceRectangle:aRectangle repairNow:doRepair
+    "senders assume that I am the listView - not a wrapper"
+
+    scrolledView invalidateDeviceRectangle:aRectangle repairNow:doRepair
+!
+
+invalidateRepairNow:doRepair
+    "senders assume that I am the listView - not a wrapper"
+
+    scrolledView invalidateRepairNow:doRepair
+! !
+
 !SequenceView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SequenceView.st,v 1.7 2000-02-18 14:36:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SequenceView.st,v 1.8 2000-09-30 15:52:39 cg Exp $'
 ! !