Tools__ChangeSetDiffList.st
changeset 10938 2afa554b0227
parent 10926 1e1743c017c6
child 12123 4bde08cebd48
child 13264 4a0cdaf356ec
--- a/Tools__ChangeSetDiffList.st	Wed Nov 30 11:06:32 2011 +0100
+++ b/Tools__ChangeSetDiffList.st	Wed Nov 30 12:14:53 2011 +0100
@@ -82,9 +82,9 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:SVN::DiffList andSelector:#windowSpec
-     SVN::DiffList new openInterface:#windowSpec
-     SVN::DiffList open
+     UIPainter new openOnClass:Tools::ChangeSetDiffList andSelector:#windowSpec
+     Tools::ChangeSetDiffList new openInterface:#windowSpec
+     Tools::ChangeSetDiffList open
     "
 
     <resource: #canvas>
@@ -102,6 +102,21 @@
         component: 
        (SpecCollection
           collection: (
+           (InputFieldSpec
+              name: 'Filter'
+              layout: (LayoutFrame 0 0 0 0 0 1 25 0)
+              initiallyInvisible: true
+              model: filterPatternHolder
+              immediateAccept: true
+              acceptOnLeave: false
+              acceptOnReturn: false
+              acceptOnTab: false
+              acceptOnPointerLeave: false
+              emptyFieldReplacementText: 'Search Filter...'
+              usePreferredHeight: true
+              useDynamicPreferredHeight: true
+              postBuildCallback: postBuildFilterView:
+            )
            (SelectionInListModelViewSpec
               name: 'List'
               layout: (LayoutFrame 0 0 0 0 0 1 0 1)
@@ -118,8 +133,6 @@
          
         )
       )
-
-    "Modified: / 29-11-2011 / 16:24:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !ChangeSetDiffList class methodsFor:'plugIn spec'!
@@ -137,13 +150,12 @@
 
     ^ #(
         #inGeneratorHolder
-        #outGeneratorHolder
+        #listEntryIconGenerator
+        #listEntryLabelGenerator
         #menuHolder
-        #listEntryLabelGenerator
-        #listEntryIconGenerator
+        #outGeneratorHolder
       ).
 
-    "Modified: / 24-11-2009 / 09:59:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !ChangeSetDiffList methodsFor:'accessing'!
@@ -339,7 +351,7 @@
 !ChangeSetDiffList class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetDiffList.st,v 1.5 2011-11-29 19:25:15 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetDiffList.st,v 1.6 2011-11-30 11:14:53 vrany Exp $'
 !
 
 version_SVN