Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
label error
authorClaus Gittinger <cg@exept.de>
Tue, 11 May 2004 14:53:59 +0200
changeset 5829 7a217cbb0dd4
parent 5828 67b58a435b3e
child 5830 fd5a247d6fb3
label error
NewSystemBrowser.st file | annotate | diff | comparison | revisions
Tools__NewSystemBrowser.st file | annotate | diff | comparison | revisions 
--- a/NewSystemBrowser.st	Tue May 11 12:41:06 2004 +0200
+++ b/NewSystemBrowser.st	Tue May 11 14:53:59 2004 +0200
@@ -2257,8 +2257,8 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:NewSystemBrowser andSelector:#noteBookWindowSpec
-     NewSystemBrowser new openInterface:#noteBookWindowSpec
+     UIPainter new openOnClass:Tools::NewSystemBrowser andSelector:#noteBookWindowSpec
+     Tools::NewSystemBrowser new openInterface:#noteBookWindowSpec
     "
 
     <resource: #canvas>
@@ -2271,7 +2271,7 @@
           label: 'NewSystemBrowser'
           name: 'NewSystemBrowser'
           min: (Point 0 0)
-          bounds: (Rectangle 13 23 813 723)
+          bounds: (Rectangle 0 0 800 700)
           menu: mainMenu
           icon: defaultIcon
         )
@@ -2341,6 +2341,7 @@
               useIndex: true
               valueChangeSelector: bufferSelectionChanged
               accessTabMenuAction: tabMenu:
+              hasScrollButtons: false
               canvas: browserCanvas
               canvasInset: 0
               keepCanvasAlive: true
@@ -30621,7 +30622,7 @@
                     numFound := initialList size.
                     numFound == 0 ifTrue:[
                         (Dialog 
-                            confirm:((label bindWith:((string ? '') allBold colorizeAllWith:Color red darkened)) , ' - none found.')
+                            confirm:((label string bindWith:((string ? '') allBold colorizeAllWith:Color red darkened)) , ' - none found.')
                             yesLabel:(Dialog classResources string:'Search Again')
                             noLabel:(Dialog classResources string:'Cancel')
                             ) 
@@ -35454,7 +35455,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.736 2004-04-27 13:36:30 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.737 2004-05-11 12:53:59 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
--- a/Tools__NewSystemBrowser.st	Tue May 11 12:41:06 2004 +0200
+++ b/Tools__NewSystemBrowser.st	Tue May 11 14:53:59 2004 +0200
@@ -2257,8 +2257,8 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:NewSystemBrowser andSelector:#noteBookWindowSpec
-     NewSystemBrowser new openInterface:#noteBookWindowSpec
+     UIPainter new openOnClass:Tools::NewSystemBrowser andSelector:#noteBookWindowSpec
+     Tools::NewSystemBrowser new openInterface:#noteBookWindowSpec
     "
 
     <resource: #canvas>
@@ -2271,7 +2271,7 @@
           label: 'NewSystemBrowser'
           name: 'NewSystemBrowser'
           min: (Point 0 0)
-          bounds: (Rectangle 13 23 813 723)
+          bounds: (Rectangle 0 0 800 700)
           menu: mainMenu
           icon: defaultIcon
         )
@@ -2341,6 +2341,7 @@
               useIndex: true
               valueChangeSelector: bufferSelectionChanged
               accessTabMenuAction: tabMenu:
+              hasScrollButtons: false
               canvas: browserCanvas
               canvasInset: 0
               keepCanvasAlive: true
@@ -30621,7 +30622,7 @@
                     numFound := initialList size.
                     numFound == 0 ifTrue:[
                         (Dialog 
-                            confirm:((label bindWith:((string ? '') allBold colorizeAllWith:Color red darkened)) , ' - none found.')
+                            confirm:((label string bindWith:((string ? '') allBold colorizeAllWith:Color red darkened)) , ' - none found.')
                             yesLabel:(Dialog classResources string:'Search Again')
                             noLabel:(Dialog classResources string:'Cancel')
                             ) 
@@ -35454,7 +35455,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.736 2004-04-27 13:36:30 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.737 2004-05-11 12:53:59 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
hg/stx-libtool