DataSetColumn.st
changeset 4963 f6db5a9da095
parent 4821 b53364768c88
child 5054 a660f11bc670
--- a/DataSetColumn.st	Mon Feb 22 16:10:14 2016 +0100
+++ b/DataSetColumn.st	Fri Feb 26 12:56:48 2016 +0100
@@ -439,19 +439,19 @@
 
     descMinWidth notNil ifTrue:[
         width := descMinWidth.
-      ^ width
+        ^ width
     ].
 
-    (descWidth ~~ 0 and:[descWidth isLimitedPrecisionReal not]) ifTrue:[
+    (descWidth ~~ 0 and:[self hasRelativeWidth not "descWidth isLimitedPrecisionReal not"]) ifTrue:[
         width := descMinWidth := descWidth.
-      ^ width
+        ^ width
     ].
 
     width := description minWidth max:(label preferredWidth).
 
-    descWidth isLimitedPrecisionReal ifTrue:[
+    self hasRelativeWidth ifTrue:[
         width := width max:(descWidth * dataSet innerWidth) rounded.
-      ^ width
+        ^ width
     ].
 
     containsText ifTrue:[
@@ -481,7 +481,7 @@
             descWidth := width
         ]
     ].
-  ^ width
+    ^ width
 
     "Modified: / 25.2.2000 / 14:29:16 / cg"
 !
@@ -1190,7 +1190,7 @@
 hasRelativeWidth
     "returns true if width is relative
     "
-    ^ descWidth isLimitedPrecisionReal 
+    ^ descWidth isInteger not. "/ descWidth isLimitedPrecisionReal 
 !
 
 hasRowSeparatorAt:rowNumber