--- a/ListView.st	Wed Feb 25 17:34:17 2009 +0100
+++ b/ListView.st	Wed Feb 25 18:48:21 2009 +0100
@@ -2027,10 +2027,12 @@
         delta := 0. mul := 0.8.
     ].
 
-    oldSize := font size.
-    newSize := ((oldSize + delta)* mul) max:2.
-    newSize ~= oldSize ifTrue:[
-        self font:(font asSize:newSize).
+    font sizeUnit == #px ifFalse:[
+        oldSize := font size.
+        newSize := ((oldSize + delta)* mul) max:2.
+        newSize ~= oldSize ifTrue:[
+            self font:(font asSize:newSize).
+        ]
     ].
 !
 
@@ -4547,5 +4549,5 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.332 2009-02-18 16:55:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.333 2009-02-25 17:48:21 cg Exp $'
 ! !