equal
deleted
inserted
replaced
1666 "/ on leave, the precedence of actions is: |
1666 "/ on leave, the precedence of actions is: |
1667 "/ 1) explicit leaveAction per key |
1667 "/ 1) explicit leaveAction per key |
1668 "/ 2) general leaveAction |
1668 "/ 2) general leaveAction |
1669 "/ 3) tab or return action |
1669 "/ 3) tab or return action |
1670 leaveKeyActions notNil ifTrue:[ |
1670 leaveKeyActions notNil ifTrue:[ |
1671 keyAction := leaveKeyActions at:key ifAbsent:nil. |
1671 keyAction := leaveKeyActions at:key ifAbsent:[keyAction]. |
1672 ]. |
1672 ]. |
1673 keyAction := keyAction ? leaveAction. |
1673 keyAction := keyAction ? leaveAction. |
1674 ]. |
1674 ]. |
1675 |
1675 |
1676 doAccept == true ifTrue:[ |
1676 doAccept == true ifTrue:[ |
2344 ! ! |
2344 ! ! |
2345 |
2345 |
2346 !EditField class methodsFor:'documentation'! |
2346 !EditField class methodsFor:'documentation'! |
2347 |
2347 |
2348 version |
2348 version |
2349 ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.230 2014-03-05 15:15:46 stefan Exp $' |
2349 ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.231 2014-04-02 10:09:05 ca Exp $' |
2350 ! |
2350 ! |
2351 |
2351 |
2352 version_CVS |
2352 version_CVS |
2353 ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.230 2014-03-05 15:15:46 stefan Exp $' |
2353 ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.231 2014-04-02 10:09:05 ca Exp $' |
2354 ! ! |
2354 ! ! |
2355 |
2355 |