--- a/MultiImage.st Fri Feb 28 18:20:42 2003 +0100
+++ b/MultiImage.st Fri Feb 28 18:42:42 2003 +0100
@@ -58,6 +58,12 @@
!MultiImage methodsFor:'queries'!
+ascentOn:aGC
+ "I will not draw myself above the baseline"
+
+ ^ 0
+!
+
height
^ images inject:0 into:[:maxSoFar :eachImage | maxSoFar max:eachImage height].
!
@@ -73,5 +79,5 @@
!MultiImage class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/MultiImage.st,v 1.5 2002-10-29 09:45:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/MultiImage.st,v 1.6 2003-02-28 17:42:42 cg Exp $'
! !