--- a/SVN__BranchAndRevisionSelectionDialog.st	Tue Jul 10 17:44:32 2012 +0200
+++ b/SVN__BranchAndRevisionSelectionDialog.st	Tue Jul 10 17:44:41 2012 +0200
@@ -222,36 +222,8 @@
                     )
                     extent: (Point 556 75)
                   )
-                 (TransparentBoxSpec
-                    name: 'RevisionLogButtonBox'
-                    component: 
-                   (SpecCollection
-                      collection: (
-                       (CheckBoxSpec
-                          label: 'Show revision log'
-                          name: 'CheckBox1'
-                          layout: (LayoutFrame -160 1 2 0 0 1 -2 1)
-                          model: revisionLogVisibleHolder
-                          translateLabel: true
-                        )
-                       (LabelSpec
-                          label: 'Revision log'
-                          name: 'RevisionLogLabel'
-                          layout: (LayoutFrame 0 0 0 0 92 0 29 0)
-                          visibilityChannel: revisionLogVisibleHolder
-                          translateLabel: true
-                          adjust: left
-                          usePreferredHeight: true
-                          usePreferredWidth: true
-                        )
-                       )
-                     
-                    )
-                    extent: (Point 556 30)
-                  )
                  (SubCanvasSpec
                     name: 'RevisionLogBrowser'
-                    visibilityChannel: revisionLogVisibleHolder
                     hasHorizontalScrollBar: false
                     hasVerticalScrollBar: false
                     autoHideScrollBars: false
@@ -270,7 +242,7 @@
                     )
                     createNewApplication: true
                     createNewBuilder: true
-                    extent: (Point 556 155)
+                    extent: (Point 556 188)
                   )
                  )
                
@@ -350,6 +322,14 @@
     "Modified: / 23-06-2009 / 23:43:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
+!BranchAndRevisionSelectionDialog methodsFor:'actions'!
+
+fetchRevisionLog
+    self revisionLogVisibleHolder value: true
+
+    "Modified: / 10-07-2012 / 16:15:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !BranchAndRevisionSelectionDialog methodsFor:'aspects'!
 
 branchHolder
@@ -437,6 +417,12 @@
     ^ holder.
 !
 
+revisionLogInvisibleHolder
+    ^BlockValue forLogicalNot: self revisionLogVisibleHolder
+
+    "Created: / 10-07-2012 / 16:16:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 revisionLogVisibleHolder
     <resource: #uiAspect>