--- a/ImageEditor.st Tue Jul 21 13:28:35 1998 +0200
+++ b/ImageEditor.st Tue Jul 21 14:17:51 1998 +0200
@@ -52,7 +52,7 @@
!ImageEditor class methodsFor:'instance creation'!
openModalOnClass: aClass andSelector: aSelector
- "opens modal the Image Editor on aClass and aSelector"
+ "opens modal a Image Editor on aClass and aSelector"
"
self openModalOnClass: self andSelector: #leftMouseKeyIcon
"
@@ -61,8 +61,9 @@
imageEditor := self new.
- aClass isClass ifTrue: [className := aClass name].
- aClass isString ifTrue:[className := aClass].
+ aClass isClass ifTrue: [className := aClass name].
+ aClass isString ifTrue: [className := aClass].
+ aClass isNil ifTrue: [className := aClass printString].
imageEditor postOpenAction: [imageEditView := imageEditor imageEditView. imageEditor loadFromOrPrepareForMessage: className, ' ', aSelector].
imageEditor openModal.
@@ -77,7 +78,7 @@
!
openOnClass: aClass andSelector: aSelector
- "opens the Image Editor on aClass and aSelector"
+ "opens a Image Editor on aClass and aSelector"
"
self openOnClass: self andSelector: #leftMouseKeyIcon
"
@@ -86,7 +87,7 @@
!
openOnFile: aFileName
- "opens the Image Editor on aFileName"
+ "opens a Image Editor on aFileName"
"
self openOnFile: 'bitmaps/SmalltalkX.xbm'
"
@@ -95,7 +96,7 @@
!
openOnImage: anImage
- "opens the Image Editor on anImage"
+ "opens a Image Editor on anImage"
"
self openOnImage: Icon startIcon
"