NewLauncher.st
changeset 5467 92ebb42b49b0
parent 5466 6156bad27291
child 5541 9f030f914e20
--- a/NewLauncher.st	Fri Jan 30 09:53:02 2004 +0100
+++ b/NewLauncher.st	Fri Jan 30 10:00:01 2004 +0100
@@ -729,7 +729,6 @@
            (MenuPanelSpec
               name: 'menuToolbarView'
               layout: (LayoutFrame 0 0.0 0 0 0 1.0 38 0)
-              style: (FontDescription times normal roman 18)
               menu: menuToolbar
             )
            (WorkspaceSpec
@@ -766,40 +765,39 @@
     <resource: #canvas>
 
     ^ 
-     #(#FullSpec
-        #name: #'windowSpec_pda'
-        #window: 
-       #(#WindowSpec
-          #label: 'Launcher'
-          #name: 'Launcher'
-          #min: #(#Point 100 20)
-          #max: #(#Point 240 300)
-          #bounds: #(#Rectangle 16 46 200 247)
-          #menu: #'menu_pda'
-          #icon: #windowIcon
+     #(FullSpec
+        name: #'windowSpec_pda'
+        window: 
+       (WindowSpec
+          label: 'Launcher'
+          name: 'Launcher'
+          min: (Point 100 20)
+          max: (Point 240 300)
+          bounds: (Rectangle 13 23 197 224)
+          menu: #'menu_pda'
+          icon: windowIcon
         )
-        #component: 
-       #(#SpecCollection
-          #collection: #(
-           #(#MenuPanelSpec
-              #name: 'menuToolbarView'
-              #layout: #(#LayoutFrame 0 0.0 0 0 0 1.0 38 0)
-              #menu: #'menuToolbar_pda'
-              #style: #(#FontDescription #helvetica #medium #roman 10)
+        component: 
+       (SpecCollection
+          collection: (
+           (MenuPanelSpec
+              name: 'menuToolbarView'
+              layout: (LayoutFrame 0 0.0 0 0 0 1.0 38 0)
+              menu: #'menuToolbar_pda'
             )
-           #(#WorkspaceSpec
-              #name: 'transcriptView'
-              #layout: #(#LayoutFrame 0 0.0 40 0.0 0 1.0 -26 1.0)
-              #hasHorizontalScrollBar: true
-              #hasVerticalScrollBar: true
-              #miniScrollerHorizontal: true
-              #miniScrollerVertical: false
+           (WorkspaceSpec
+              name: 'transcriptView'
+              layout: (LayoutFrame 0 0.0 40 0.0 0 1.0 -26 1.0)
+              hasHorizontalScrollBar: true
+              hasVerticalScrollBar: true
+              miniScrollerHorizontal: true
+              miniScrollerVertical: false
             )
-           #(#UISubSpecification
-              #name: 'infoBarSubSpec'
-              #layout: #(#LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
-              #majorKey: #ToolApplicationModel
-              #minorKey: #windowSpecForInfoBarWithClock
+           (UISubSpecification
+              name: 'infoBarSubSpec'
+              layout: (LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
+              majorKey: ToolApplicationModel
+              minorKey: windowSpecForInfoBarWithClock
             )
            )
          
@@ -4291,5 +4289,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.303 2004-01-30 08:53:02 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.304 2004-01-30 09:00:01 ca Exp $'
 ! !