--- a/NoteBookView.st	Sun Nov 04 21:48:06 2018 +0100
+++ b/NoteBookView.st	Tue Nov 06 18:01:32 2018 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1997 by eXept Software AG
               All Rights Reserved
@@ -1415,9 +1417,10 @@
 
     bFrame := self frameForAddTabButton.
 
-gc paint:(showingEnteredAddTabButton ifTrue:[Color green]ifFalse:[Color red]).
-gc fillRectangle:bFrame.
-gc paint:self blackColor.
+"/ gc paint:(showingEnteredAddTabButton ifTrue:[Color green]ifFalse:[Color red]).
+"/ gc fillRectangle:bFrame.
+"/ gc paint:self blackColor.
+    self clearRectangle:bFrame.
 
     AddTabIcon notNil ifTrue:[
         addTabIcon isNil ifTrue:[
@@ -1433,6 +1436,8 @@
         gc displayLineFrom:bFrame leftCenter+(1@0) to:bFrame rightCenter-(1@0).
         gc displayLineFrom:bFrame topCenter+(0@1) to:bFrame bottomCenter-(0@1).
     ]
+
+    "Modified: / 06-11-2018 / 18:00:25 / Claus Gittinger"
 !
 
 drawBorderEdges