--- a/Label.st	Sun Oct 26 21:08:14 2008 +0100
+++ b/Label.st	Sun Oct 26 21:08:24 2008 +0100
@@ -1571,8 +1571,12 @@
 
     |extra|
 
-    "/ If I have an explicit preferredExtent ..
+    "/ If I have an explicit preferredExtent..
+    explicitExtent notNil ifTrue:[
+        ^ explicitExtent
+    ].
 
+    "/ If I have a cached preferredExtent value..
     preferredExtent notNil ifTrue:[
         ^ preferredExtent
     ].
@@ -1842,5 +1846,5 @@
 !Label class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.137 2008-06-28 11:44:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.138 2008-10-26 20:08:24 stefan Exp $'
 ! !