MemoryMonitor.st
changeset 5938 482ef199ebdb
parent 2366 dcbc29510446
child 9800 42ebba26d45e
--- a/MemoryMonitor.st	Wed Jun 30 17:23:57 2004 +0200
+++ b/MemoryMonitor.st	Sat Jul 03 19:41:15 2004 +0200
@@ -11,6 +11,8 @@
 "
 
 
+"{ Package: 'stx:libtool' }"
+
 ApplicationModel subclass:#MemoryMonitor
 	instanceVariableNames:'memoryView'
 	classVariableNames:''
@@ -129,26 +131,25 @@
     <resource: #canvas>
 
     ^ 
-     #(#FullSpec
-        #name: #windowSpec
-        #window: 
-       #(#WindowSpec
-          #label: 'MemoryMonitor'
-          #name: 'MemoryMonitor'
-          #min: #(#Point 175 326)
-          #max: #(#Point 1024 768)
-          #bounds: #(#Rectangle 16 49 191 375)
-          #menu: #mainMenu
-          #icon: #defaultIcon
+     #(FullSpec
+        name: windowSpec
+        window: 
+       (WindowSpec
+          label: 'MemoryMonitor'
+          name: 'MemoryMonitor'
+          min: (Point 175 326)
+          bounds: (Rectangle 0 0 175 326)
+          menu: mainMenu
+          icon: defaultIcon
         )
-        #component: 
-       #(#SpecCollection
-          #collection: #(
-           #(#ArbitraryComponentSpec
-              #name: 'memoryView'
-              #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-              #hasBorder: false
-              #component: #MemoryMonitorView
+        component: 
+       (SpecCollection
+          collection: (
+           (ArbitraryComponentSpec
+              name: 'memoryView'
+              layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+              hasBorder: false
+              component: MemoryMonitorView
             )
            )
          
@@ -285,5 +286,5 @@
 !MemoryMonitor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/MemoryMonitor.st,v 1.64 1999-08-28 12:53:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/MemoryMonitor.st,v 1.65 2004-07-03 17:41:15 stefan Exp $'
 ! !