--- a/Tools__LintRuleDetail.st	Mon Sep 05 05:28:07 2011 +0200
+++ b/Tools__LintRuleDetail.st	Mon Sep 05 05:53:03 2011 +0200
@@ -135,6 +135,7 @@
                     visibilityChannel: rationaleVisibleHolder
                     hasHorizontalScrollBar: true
                     hasVerticalScrollBar: true
+                    backgroundColor: (Color 86.9993133440146 86.9993133440146 86.9993133440146)
                     htmlText: ruleRationaleAspect
                     extent: (Point 560 270)
                     postBuildCallback: setupHTMLView:
@@ -163,7 +164,7 @@
      (if this app is embedded in a subCanvas)."
 
     ^ #(
-	#ruleHolder
+        #ruleHolder
       ).
 
 ! !
@@ -282,10 +283,11 @@
 updateVisibility
 
     self ruleHolder value notNil
-	ifTrue:[self show]
-	ifFalse:[self hide]
+        ifTrue:[self show]
+        ifFalse:[self hide].
 
     "Created: / 04-08-2011 / 16:39:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 04-09-2011 / 20:18:48 / cg"
 ! !
 
 !LintRuleDetail methodsFor:'initialization'!
@@ -317,30 +319,32 @@
 
 visibility: visibility height: height
     | container list detail h |
-    (container := self window container) ifNil:[^self].
+
+    (container := self window container) isNil ifTrue:[^self].
     h := visibility ifFalse:[0] ifTrue:[height].
 
-    container isVisible == visibility ifFalse:
-        [container isVisible: visibility].
-
+    container isVisible == visibility ifFalse: [
+        container isVisible: visibility
+    ].
 
     list := container container subViews first.
     detail := container container subViews second.
 
-    (list layout bottomOffset ~= height negated) ifTrue:
-        [list layout:
-            (list layout bottomOffset: height negated; yourself)].
-    (detail layout topOffset ~= height negated) ifTrue:
-        [detail layout:
-            (detail layout topOffset: height negated; yourself)].
+    (list layout bottomOffset ~= height negated) ifTrue:[
+        list layout: (list layout bottomOffset: height negated; yourself)
+    ].
+    (detail layout topOffset ~= height negated) ifTrue:[
+        detail layout: (detail layout topOffset: height negated; yourself)
+    ].
 
     "Created: / 11-03-2010 / 09:51:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 04-09-2011 / 20:15:40 / cg"
 ! !
 
 !LintRuleDetail class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleDetail.st,v 1.6 2011-08-05 12:36:26 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleDetail.st,v 1.7 2011-09-05 03:53:03 cg Exp $'
 !
 
 version_SVN