--- a/NewLauncher.st Fri Jan 30 00:48:56 2004 +0100
+++ b/NewLauncher.st Fri Jan 30 09:53:02 2004 +0100
@@ -712,45 +712,43 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #windowSpec
- #window:
- #(#WindowSpec
- #label: 'Launcher'
- #name: 'Launcher'
- #min: #(#Point 374 44)
- #bounds: #(#Rectangle 13 23 304 225)
- #menu: #menu
- #icon: #windowIcon
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'Launcher'
+ name: 'Launcher'
+ min: (Point 374 44)
+ bounds: (Rectangle 13 23 304 225)
+ menu: menu
+ icon: windowIcon
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#MenuPanelSpec
- #name: 'menuToolbarView'
- #layout: #(#LayoutFrame 0 0.0 0 0 0 1.0 38 0)
- #menu: #menuToolbar
- #style: #(#FontDescription #helvetica #medium #roman 10)
+ component:
+ (SpecCollection
+ collection: (
+ (MenuPanelSpec
+ name: 'menuToolbarView'
+ layout: (LayoutFrame 0 0.0 0 0 0 1.0 38 0)
+ style: (FontDescription times normal roman 18)
+ menu: menuToolbar
)
- #(#WorkspaceSpec
- #name: 'transcriptView'
- #layout: #(#LayoutFrame 0 0.0 40 0.0 0 1.0 -26 1.0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #miniScrollerHorizontal: true
+ (WorkspaceSpec
+ name: 'transcriptView'
+ layout: (LayoutFrame 0 0.0 40 0.0 0 1.0 -26 1.0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ miniScrollerHorizontal: true
)
- #(#UISubSpecification
- #name: 'infoBarSubSpec'
- #layout: #(#LayoutFrame 0 0.0 -26 1 0 1.0 0 1.0)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForInfoBarWithClock
+ (UISubSpecification
+ name: 'infoBarSubSpec'
+ layout: (LayoutFrame 0 0.0 -26 1 0 1.0 0 1.0)
+ majorKey: ToolApplicationModel
+ minorKey: windowSpecForInfoBarWithClock
)
)
)
)
-
- "Modified: / 15.11.2001 / 22:42:53 / cg"
!
windowSpec_pda
@@ -4293,5 +4291,5 @@
!NewLauncher class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.302 2003-12-19 12:30:37 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.303 2004-01-30 08:53:02 ca Exp $'
! !