--- a/NoteBookView.st Tue May 20 08:49:19 1997 +0200
+++ b/NoteBookView.st Tue May 20 08:51:40 1997 +0200
@@ -239,15 +239,21 @@
tabRaw := TabView origin:0.0@0.0 corner:1.0@0.0 in:self.
canvas := View origin:0.0@0.0 corner:1.0@1.0 in:self.
- tabRaw useIndex:true.
tabRaw addDependent:self.
self delegate:(KeyboardForwarder from:self toView:tabRaw).
+ canvas viewBackground:(tabRaw styleAt:#selectedColor).
! !
+!NoteBookView methodsFor:'selection'!
+
+setSelection:something
+ tabRaw setSelection:something
+! !
+
!NoteBookView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.2 1997-04-28 13:39:38 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.3 1997-05-20 06:51:40 ca Exp $'
! !