SimpleDialog.st
changeset 1381 1035403e302e
parent 1375 6d04ebef6836
child 1397 47ac1d3e1df1
equal deleted inserted replaced
1380:a999c793cd59 1381:1035403e302e
   211     ^ accept
   211     ^ accept
   212 
   212 
   213     "Modified: / 20.5.1998 / 20:51:05 / cg"
   213     "Modified: / 20.5.1998 / 20:51:05 / cg"
   214 !
   214 !
   215 
   215 
       
   216 accepted
       
   217     "after the box has closed:
       
   218          return true if accepted, false if canceled"
       
   219 
       
   220     ^ self accept value
       
   221 
       
   222 !
       
   223 
   216 bindings
   224 bindings
   217     "return my builders bindings"
   225     "return my builders bindings"
   218 
   226 
   219     ^ builder bindings
   227     ^ builder bindings
   220 
   228 
   603 ! !
   611 ! !
   604 
   612 
   605 !SimpleDialog class methodsFor:'documentation'!
   613 !SimpleDialog class methodsFor:'documentation'!
   606 
   614 
   607 version
   615 version
   608     ^ '$Header: /cvs/stx/stx/libview2/SimpleDialog.st,v 1.30 2000-05-24 10:49:46 stefan Exp $'
   616     ^ '$Header: /cvs/stx/stx/libview2/SimpleDialog.st,v 1.31 2000-07-26 13:13:36 cg Exp $'
   609 ! !
   617 ! !