--- a/Launcher.st Fri Jan 17 20:45:58 1997 +0100
+++ b/Launcher.st Fri Jan 17 23:28:18 1997 +0100
@@ -410,7 +410,8 @@
component := box addTextLabel:(resources at:'Resource symbol (empty for any; no matchPattern):') withCRs.
component adjust:#left.
- box addInputFieldOn:resourceHolder tabable:true.
+ component := box addComboBoxOn:resourceHolder tabable:true.
+ component list:#('* any *' 'keyboard' 'style' 'canvas' nil 'needsFix').
component := box addTextLabel:(resources at:'Resource value (''*'' for any; matchPattern ok):') withCRs.
component adjust:#left.
@@ -426,7 +427,7 @@
rsrc := resourceHolder value.
value := valueHolder value.
- (rsrc isNil or:[rsrc isEmpty or:[rsrc = '*']]) ifTrue:[
+ (rsrc isNil or:[rsrc isEmpty or:[rsrc = '*' or:[rsrc = '* any *']]]) ifTrue:[
t := 'methods with any resource'.
rsrc := nil
] ifFalse:[
@@ -448,7 +449,7 @@
].
"Created: 28.5.1996 / 13:15:16 / cg"
- "Modified: 16.1.1997 / 00:53:05 / cg"
+ "Modified: 17.1.1997 / 23:14:18 / cg"
!
browseSenders
@@ -4506,5 +4507,5 @@
!Launcher class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.235 1997-01-17 17:02:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.236 1997-01-17 22:28:18 cg Exp $'
! !