equal
deleted
inserted
replaced
132 ! ! |
132 ! ! |
133 |
133 |
134 !EnterBox2 methodsFor:'user interaction'! |
134 !EnterBox2 methodsFor:'user interaction'! |
135 |
135 |
136 keyPress:aKey x:x y:y |
136 keyPress:aKey x:x y:y |
137 "return-key dublicates ok-function if acceptReturnAsOK is true" |
137 "return-key duplicates ok-function if acceptReturnAsOK is true" |
138 |
138 |
139 <resource: #keyboard (#Return)> |
139 <resource: #keyboard (#Return)> |
140 |
140 |
141 acceptReturnAsOK ifTrue:[ |
141 acceptReturnAsOK ifTrue:[ |
142 (aKey == #Return) ifTrue:[^ self ok2Pressed] |
142 (aKey == #Return) ifTrue:[^ self ok2Pressed] |
154 ! ! |
154 ! ! |
155 |
155 |
156 !EnterBox2 class methodsFor:'documentation'! |
156 !EnterBox2 class methodsFor:'documentation'! |
157 |
157 |
158 version |
158 version |
159 ^ '$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.24 2003-02-25 14:58:23 cg Exp $' |
159 ^ '$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.25 2003-03-02 18:46:52 stefan Exp $' |
160 ! ! |
160 ! ! |