--- a/NoteBookView.st	Wed Nov 16 23:16:34 2016 +0100
+++ b/NoteBookView.st	Wed Nov 16 23:16:49 2016 +0100
@@ -861,7 +861,7 @@
         ].
     ].
     y := y + selectionInsetY + lvl + tabTopMargin + tabBottomMargin.
-    x := x + selectionInsetX + selectionInsetX + (lvl + lvl * size).
+    x := x + selectionInsetX + selectionInsetX + ((lvl + lvl) * size).
 
     isHorizontal := self isHorizontal.
 
@@ -888,6 +888,8 @@
 
     isHorizontal ifTrue:[ ^ x @ y ].
     ^ y @ x
+
+    "Modified (format): / 16-11-2016 / 23:13:18 / cg"
 !
 
 preferredExtentForTab:aTab