equal
deleted
inserted
replaced
2303 |
2303 |
2304 self assert:makeOutputWindow notNil. |
2304 self assert:makeOutputWindow notNil. |
2305 self assert:makeOutputWindow model == self makeOutputHolder. |
2305 self assert:makeOutputWindow model == self makeOutputHolder. |
2306 |
2306 |
2307 ActivityNotification handle:[:ex | |
2307 ActivityNotification handle:[:ex | |
2308 ex messageText notNil ifTrue:[ |
2308 |msg| |
|
2309 |
|
2310 (msg := ex messageText) notNil ifTrue:[ |
2309 makeOutputWindow endEntry. |
2311 makeOutputWindow endEntry. |
2310 makeOutputWindow cr. |
2312 makeOutputWindow cr. |
2311 makeOutputWindow nextPutLine:(ex messageText withColor:Color white on:Color blue). |
2313 makeOutputWindow nextPutLine:( |
|
2314 "/ msg withColor:Color white on:Color blue |
|
2315 msg withColor:Color blue |
|
2316 ). |
2312 makeOutputWindow endEntry. |
2317 makeOutputWindow endEntry. |
2313 ]. |
2318 ]. |
2314 ex proceed. |
2319 ex proceed. |
2315 ] do:[ |
2320 ] do:[ |
2316 self getProjectBuilder. |
2321 self getProjectBuilder. |
2321 Error handle:[:ex | |
2326 Error handle:[:ex | |
2322 ex creator = MessageNotUnderstood ifTrue:[ex reject]. |
2327 ex creator = MessageNotUnderstood ifTrue:[ex reject]. |
2323 |
2328 |
2324 makeOutputWindow endEntry. |
2329 makeOutputWindow endEntry. |
2325 makeOutputWindow cr. |
2330 makeOutputWindow cr. |
2326 makeOutputWindow nextPutLine:(ex description withColor:Color white on:Color red). |
2331 makeOutputWindow nextPutLine:( |
|
2332 ex description withColor:Color white on:Color red |
|
2333 "/ ex description withColor:Color red darkened |
|
2334 ). |
2327 makeOutputWindow endEntry. |
2335 makeOutputWindow endEntry. |
2328 Debugging == true ifTrue:[ ex reject ]. |
2336 Debugging == true ifTrue:[ ex reject ]. |
2329 ex proceed. |
2337 ex proceed. |
2330 ] do:[ |
2338 ] do:[ |
2331 projectBuilder buildWithColorizedOutputTo:makeOutputWindow. |
2339 projectBuilder buildWithColorizedOutputTo:makeOutputWindow. |
2336 Debugging := true. |
2344 Debugging := true. |
2337 Debugging := false. |
2345 Debugging := false. |
2338 " |
2346 " |
2339 |
2347 |
2340 "Modified: / 07-06-2016 / 11:00:01 / cg" |
2348 "Modified: / 07-06-2016 / 11:00:01 / cg" |
|
2349 "Modified (comment): / 29-12-2018 / 12:51:51 / Claus Gittinger" |
2341 ! |
2350 ! |
2342 |
2351 |
2343 selectedApplicationChanged |
2352 selectedApplicationChanged |
2344 |idx| |
2353 |idx| |
2345 |
2354 |