Tools__ProjectBuilderAssistantApplication.st
changeset 3558 6609ee3ba154
parent 3520 b139ae538098
child 3559 ec4d0d1605c5
equal deleted inserted replaced
3557:d124916e2e4d 3558:6609ee3ba154
  2260             p terminate.
  2260             p terminate.
  2261             p waitUntilTerminated.
  2261             p waitUntilTerminated.
  2262         ].
  2262         ].
  2263         makeOutputWindow endEntry.
  2263         makeOutputWindow endEntry.
  2264         makeOutputWindow cr.
  2264         makeOutputWindow cr.
  2265         makeOutputWindow nextPutLine:('Make Canceled' colorizeAllWith:Color white on:Color red).
  2265         makeOutputWindow nextPutLine:('Make Canceled' withColor:Color white on:Color red).
  2266         makeOutputWindow endEntry.
  2266         makeOutputWindow endEntry.
  2267     ].
  2267     ].
  2268 
  2268 
  2269     "Modified: / 28-11-2017 / 17:10:15 / cg"
  2269     "Modified: / 28-11-2017 / 17:10:15 / cg"
  2270 !
  2270 !
  2306 
  2306 
  2307     ActivityNotification handle:[:ex |
  2307     ActivityNotification handle:[:ex |
  2308         ex messageText notNil ifTrue:[
  2308         ex messageText notNil ifTrue:[
  2309             makeOutputWindow endEntry.
  2309             makeOutputWindow endEntry.
  2310             makeOutputWindow cr.
  2310             makeOutputWindow cr.
  2311             makeOutputWindow nextPutLine:(ex messageText colorizeAllWith:Color white on:Color blue).
  2311             makeOutputWindow nextPutLine:(ex messageText withColor:Color white on:Color blue).
  2312             makeOutputWindow endEntry.
  2312             makeOutputWindow endEntry.
  2313         ].
  2313         ].
  2314         ex proceed.
  2314         ex proceed.
  2315     ] do:[
  2315     ] do:[
  2316         self getProjectBuilder.
  2316         self getProjectBuilder.
  2321         Error handle:[:ex |
  2321         Error handle:[:ex |
  2322             ex creator = MessageNotUnderstood ifTrue:[ex reject].
  2322             ex creator = MessageNotUnderstood ifTrue:[ex reject].
  2323 
  2323 
  2324             makeOutputWindow endEntry.
  2324             makeOutputWindow endEntry.
  2325             makeOutputWindow cr.
  2325             makeOutputWindow cr.
  2326             makeOutputWindow nextPutLine:(ex description colorizeAllWith:Color white on:Color red).
  2326             makeOutputWindow nextPutLine:(ex description withColor:Color white on:Color red).
  2327             makeOutputWindow endEntry.
  2327             makeOutputWindow endEntry.
  2328             Debugging == true ifTrue:[ ex reject ].
  2328             Debugging == true ifTrue:[ ex reject ].
  2329             ex proceed.
  2329             ex proceed.
  2330         ] do:[
  2330         ] do:[
  2331             projectBuilder buildWithColorizedOutputTo:makeOutputWindow.
  2331             projectBuilder buildWithColorizedOutputTo:makeOutputWindow.