--- a/MultiImage.st Tue Mar 24 16:15:07 2015 +0100
+++ b/MultiImage.st Thu Mar 26 11:07:18 2015 +0100
@@ -11,6 +11,8 @@
"
"{ Package: 'stx:libview2' }"
+"{ NameSpace: Smalltalk }"
+
Object subclass:#MultiImage
instanceVariableNames:'images'
classVariableNames:''
@@ -87,21 +89,12 @@
^ self
!
-inspectorClass
- "redefined to launch an ImageInspector
- (instead of the default InspectorView)."
-
- (self width notNil and:[self height notNil]) ifTrue:[
- ^ ImageInspectorView
- ].
- ^ super inspectorClass
-!
-
onDevice:device
images := images collect:[:eachImage | (eachImage onDevice:device) ? eachImage].
^ self
! !
+
!MultiImage methodsFor:'queries'!
ascentOn:aGC
@@ -133,6 +126,6 @@
!MultiImage class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/MultiImage.st,v 1.9 2014-04-08 17:21:49 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/MultiImage.st,v 1.10 2015-03-26 10:07:18 cg Exp $'
! !