--- a/NoteBookView.st	Mon Jan 31 16:47:52 2000 +0100
+++ b/NoteBookView.st	Tue Feb 01 11:15:28 2000 +0100
@@ -1695,14 +1695,21 @@
         aDirection == #left ifTrue:[x := x + 1] ifFalse:[x := x - 1].
 
         dispObj isImageOrForm ifFalse:[
-            x := x + aGC font descent.
+
+            dispObj isString ifTrue:[ 
+                x := x + aGC font descent.
+            ].
             "/ workaround for a bug in display-with-angle,
             "/ iff displayed string is a labelAndIcon.
             "/ (In this case, display is always opaque, and the current
             "/  backgroundPaint color is used to fill the underlying rectangle)
             "/
-            aGC backgroundPaint:(aGC paint:fgColor).
+            aGC paint:fgColor.
+            aGC backgroundPaint:aGC backgroundColor.
           ^ aGC displayString:dispObj x:x y:y angle:90.
+        ] ifTrue:[
+            (dispObj rotated:90) displayOn:aGC x:x y:y.
+            ^ self.
         ]
     ].
 
@@ -1746,5 +1753,5 @@
 !NoteBookView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.25 2000-01-27 11:01:26 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.26 2000-02-01 10:15:28 ca Exp $'
 ! !