--- a/NoteBookView.st Wed Nov 16 06:42:54 2016 +0100
+++ b/NoteBookView.st Fri Nov 18 06:52:16 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