class: FileApplicationNoteBook
changed: #tabStringAdd:for:
oops - handle labelAndIcon in tabLabel
--- a/FileApplicationNoteBook.st Mon May 25 14:34:59 2015 +0200
+++ b/FileApplicationNoteBook.st Tue May 26 03:26:59 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 2002 by eXept Software AG
All Rights Reserved
@@ -702,7 +700,7 @@
index isNil ifTrue:[ ^ self].
text := self privateTabList at:index.
stream := CharacterWriteStream new.
- stream nextPutAll:text.
+ stream nextPutAll:text string.
stream space.
stream nextPutAll:aString.
self privateTabList at:index put:(Text string:(stream contents)).
@@ -7491,10 +7489,10 @@
!FileApplicationNoteBook class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.319 2015-04-22 18:05:37 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.320 2015-05-26 01:26:59 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.319 2015-04-22 18:05:37 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.320 2015-05-26 01:26:59 cg Exp $'
! !