Tools__ProjectCheckerBrowser.st
branchjv
changeset 12294 b3efe6954d0f
parent 12267 192a107e26b9
child 12401 4714b9640528
--- a/Tools__ProjectCheckerBrowser.st	Thu Sep 13 13:53:46 2012 +0100
+++ b/Tools__ProjectCheckerBrowser.st	Thu Sep 13 18:50:09 2012 +0100
@@ -266,22 +266,16 @@
 problemListHolder
     <resource: #uiAspect>
 
-    "automatically generated by UIPainter ..."
 
-    "*** the code below creates a default model when invoked."
-    "*** (which may not be the one you wanted)"
-    "*** Please change as required and accept it in the browser."
-    "*** (and replace this comment by something more useful ;-)"
 
     problemListHolder isNil ifTrue:[
-        problemListHolder := ValueHolder new.
-"/ if your app needs to be notified of changes, uncomment one of the lines below:
-"/       problemListHolder addDependent:self.
-"/       problemListHolder onChangeSend:#problemListHolderChanged to:self.
+"/        problemListHolder := ValueHolder new.
+        problemListHolder := AspectAdaptor forAspect: #value.
+        problemListHolder subjectSendsUpdates: true.
     ].
     ^ problemListHolder.
 
-    "Modified: / 13-02-2012 / 18:47:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (format): / 13-09-2012 / 17:26:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 problemSelectionHolder
@@ -348,9 +342,9 @@
 
 updateFromProjectCheckerHolder
 
-    self problemListHolder value: self projectChecker problems.
+    self problemListHolder subject: self projectChecker problems.
 
-    "Modified: / 25-07-2012 / 18:01:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 13-09-2012 / 17:34:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !ProjectCheckerBrowser methodsFor:'hooks'!
@@ -366,5 +360,5 @@
 !ProjectCheckerBrowser class methodsFor:'documentation'!
 
 version_SVN
-    ^ '$Id: Tools__ProjectCheckerBrowser.st 8024 2012-07-26 10:10:37Z vranyj1 $'
+    ^ '$Id: Tools__ProjectCheckerBrowser.st 8056 2012-09-13 17:50:09Z vranyj1 $'
 ! !