--- a/FileApplicationNoteBook.st	Fri Feb 03 15:40:07 2017 +0100
+++ b/FileApplicationNoteBook.st	Sat Feb 04 22:20:07 2017 +0100
@@ -716,7 +716,7 @@
     text := Text string:aString.
 
     tabItem := self privateTabList at:index.
-    tabItem class == LabelAndIcon ifTrue:[
+    tabItem isLabelAndIcon ifTrue:[
         text := LabelAndIcon icon:(tabItem icon) string:text.
     ].
 
@@ -724,6 +724,8 @@
     self selectedEditorPage value == index ifTrue:[
         self changeFileBrowserTitleTo:aString.
     ].
+
+    "Modified: / 04-02-2017 / 22:11:05 / cg"
 !
 
 tryToGetExistingApplFor:aClass withItem:anItem withType:aType preSetItem:aBlock