SourceCodeManagerUtilities.st
changeset 3683 fb6ad154b94d
parent 3679 287d95522230
child 3692 ce00ca02e94a
equal deleted inserted replaced
3682:a590e9e018e3 3683:fb6ad154b94d
  3604 
  3604 
  3605     box addVerticalSpace.
  3605     box addVerticalSpace.
  3606     box addAbortAndOkButtons.
  3606     box addAbortAndOkButtons.
  3607 
  3607 
  3608     (YesToAllNotification notNil and:[YesToAllNotification isHandled]) ifTrue:[
  3608     (YesToAllNotification notNil and:[YesToAllNotification isHandled]) ifTrue:[
  3609         component := Button label:'Yes to all'.
  3609         component := Button label:(resources string:'Yes to All').
  3610         component action:[
  3610         component action:[
  3611                             YesToAllNotification queryWith:true.
  3611                             YesToAllNotification queryWith:true.
  3612                             box doAccept.
  3612                             box doAccept.
  3613                             box okPressed.
  3613                             box okPressed.
  3614                          ].
  3614                          ].
  3615         box addButton:component.
  3615         box addButton:component.
  3616     ].
  3616     ].
  3617     (AbortAllSignal isHandled) ifTrue:[
  3617     (AbortAllSignal isHandled) ifTrue:[
  3618         component := Button label:'Cancel all'.
  3618         component := Button label:(resources string:'Cancel All').
  3619         component action:[
  3619         component action:[
  3620                             box hide.
  3620                             box hide.
  3621                             AbortAllSignal raiseSignal.
  3621                             AbortAllSignal raiseSignal.
  3622                          ].
  3622                          ].
  3623         box addButton:component before:nil.
  3623         box addButton:component before:nil.
  4293 ! !
  4293 ! !
  4294 
  4294 
  4295 !SourceCodeManagerUtilities class methodsFor:'documentation'!
  4295 !SourceCodeManagerUtilities class methodsFor:'documentation'!
  4296 
  4296 
  4297 version
  4297 version
  4298     ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.314 2014-12-01 14:34:37 cg Exp $'
  4298     ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.315 2014-12-12 19:16:58 cg Exp $'
  4299 !
  4299 !
  4300 
  4300 
  4301 version_CVS
  4301 version_CVS
  4302     ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.314 2014-12-01 14:34:37 cg Exp $'
  4302     ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.315 2014-12-12 19:16:58 cg Exp $'
  4303 ! !
  4303 ! !
  4304 
  4304