--- a/ImageEditor.st Mon May 04 20:31:28 1998 +0200
+++ b/ImageEditor.st Mon May 04 20:59:05 1998 +0200
@@ -70,7 +70,8 @@
resourceClassName := imageEditView resourceClass.
resourceSelector := imageEditView resourceSelector.
- (className asString ~= resourceClassName) | (aSelector asString ~= resourceSelector)
+ ((className asString ~= resourceClassName)
+ or:[aSelector asString ~= resourceSelector])
ifTrue: [^resourceClassName, ' ', resourceSelector]
ifFalse:[^nil]
!
--- a/ResourceRetriever.st Mon May 04 20:31:28 1998 +0200
+++ b/ResourceRetriever.st Mon May 04 20:59:05 1998 +0200
@@ -188,7 +188,7 @@
resource
"returns a form assigned to resource or nil
"
- |img cls appl|
+ |img cls|
selector isNil ifTrue:[
^nil