class: FileApplicationNoteBook
authorClaus Gittinger <cg@exept.de>
Tue, 26 May 2015 03:26:59 +0200
changeset 15668 aaaddffbefe0
parent 15667 7e33637ddce6
child 15669 3342bf525323
child 15670 f0542a324d46
class: FileApplicationNoteBook changed: #tabStringAdd:for: oops - handle labelAndIcon in tabLabel
FileApplicationNoteBook.st
--- 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 $'
 ! !