Tools__ProjectCheckerBrowser.st
branchjv
changeset 12294 b3efe6954d0f
parent 12267 192a107e26b9
child 12401 4714b9640528
equal deleted inserted replaced
12293:51d1dae2e7bb 12294:b3efe6954d0f
   264 !
   264 !
   265 
   265 
   266 problemListHolder
   266 problemListHolder
   267     <resource: #uiAspect>
   267     <resource: #uiAspect>
   268 
   268 
   269     "automatically generated by UIPainter ..."
   269 
   270 
       
   271     "*** the code below creates a default model when invoked."
       
   272     "*** (which may not be the one you wanted)"
       
   273     "*** Please change as required and accept it in the browser."
       
   274     "*** (and replace this comment by something more useful ;-)"
       
   275 
   270 
   276     problemListHolder isNil ifTrue:[
   271     problemListHolder isNil ifTrue:[
   277         problemListHolder := ValueHolder new.
   272 "/        problemListHolder := ValueHolder new.
   278 "/ if your app needs to be notified of changes, uncomment one of the lines below:
   273         problemListHolder := AspectAdaptor forAspect: #value.
   279 "/       problemListHolder addDependent:self.
   274         problemListHolder subjectSendsUpdates: true.
   280 "/       problemListHolder onChangeSend:#problemListHolderChanged to:self.
       
   281     ].
   275     ].
   282     ^ problemListHolder.
   276     ^ problemListHolder.
   283 
   277 
   284     "Modified: / 13-02-2012 / 18:47:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   278     "Modified (format): / 13-09-2012 / 17:26:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   285 !
   279 !
   286 
   280 
   287 problemSelectionHolder
   281 problemSelectionHolder
   288     <resource: #uiAspect>
   282     <resource: #uiAspect>
   289 
   283 
   346     super update:something with:aParameter from:changedObject
   340     super update:something with:aParameter from:changedObject
   347 !
   341 !
   348 
   342 
   349 updateFromProjectCheckerHolder
   343 updateFromProjectCheckerHolder
   350 
   344 
   351     self problemListHolder value: self projectChecker problems.
   345     self problemListHolder subject: self projectChecker problems.
   352 
   346 
   353     "Modified: / 25-07-2012 / 18:01:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   347     "Modified: / 13-09-2012 / 17:34:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   354 ! !
   348 ! !
   355 
   349 
   356 !ProjectCheckerBrowser methodsFor:'hooks'!
   350 !ProjectCheckerBrowser methodsFor:'hooks'!
   357 
   351 
   358 setupHTMLView:aView
   352 setupHTMLView:aView
   364 ! !
   358 ! !
   365 
   359 
   366 !ProjectCheckerBrowser class methodsFor:'documentation'!
   360 !ProjectCheckerBrowser class methodsFor:'documentation'!
   367 
   361 
   368 version_SVN
   362 version_SVN
   369     ^ '$Id: Tools__ProjectCheckerBrowser.st 8024 2012-07-26 10:10:37Z vranyj1 $'
   363     ^ '$Id: Tools__ProjectCheckerBrowser.st 8056 2012-09-13 17:50:09Z vranyj1 $'
   370 ! !
   364 ! !