--- a/Tools__ProjectCheckerBrowser.st	Wed Feb 22 17:35:52 2012 +0000
+++ b/Tools__ProjectCheckerBrowser.st	Thu Feb 23 15:20:50 2012 +0000
@@ -102,13 +102,15 @@
                     component: 
                    (SpecCollection
                       collection: (
-                       (TextEditorSpec
+                       (HTMLViewSpec
                           name: 'Description'
                           layout: (LayoutFrame 0 0 0 0 0 1 0 1)
-                          model: problemDescriptionAspect
+                          level: 0
+                          visibilityChannel: rationaleVisibleHolder
                           hasHorizontalScrollBar: true
                           hasVerticalScrollBar: true
-                          hasKeyboardFocusInitially: false
+                          htmlText: problemDescriptionAspect
+                          postBuildCallback: setupHTMLView:
                         )
                        )
                      
@@ -149,12 +151,12 @@
     |holder|
 
     (holder := builder bindingAt:#problemDescriptionAspect) isNil ifTrue:[
-        holder :=  (AspectAdaptor forAspect: #description)
+        holder :=  (AspectAdaptor forAspect: #descriptionAndActions)
                         subjectChannel: self problemSelectionHolder.
     ].
     ^ holder.
 
-    "Modified: / 13-02-2012 / 18:48:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 23-02-2012 / 14:32:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 problemListHolder
@@ -197,8 +199,18 @@
     ^ problemSelectionHolder.
 ! !
 
+!ProjectCheckerBrowser methodsFor:'hooks'!
+
+setupHTMLView:aView
+    aView painter
+        leftMargin:20;
+        topMargin:5.
+
+    "Created: / 23-02-2012 / 14:04:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !ProjectCheckerBrowser class methodsFor:'documentation'!
 
 version_SVN
-    ^ '$Id: Tools__ProjectCheckerBrowser.st 7890 2012-02-14 17:08:43Z vranyj1 $'
+    ^ '$Id: Tools__ProjectCheckerBrowser.st 7915 2012-02-23 15:20:50Z vranyj1 $'
 ! !