Tools__WebBrowserPage.st
changeset 10567 66aa5aa140dc
parent 10066 cc32cec24c48
child 10713 1cedadc281c8
--- a/Tools__WebBrowserPage.st	Thu Aug 11 01:45:21 2011 +0200
+++ b/Tools__WebBrowserPage.st	Thu Aug 11 01:45:39 2011 +0200
@@ -78,6 +78,43 @@
 
 !WebBrowserPage class methodsFor:'interface specs'!
 
+contentSpec
+    "This resource specification was automatically generated
+     by the UIPainter of ST/X."
+
+    "Do not manually edit this!! If it is corrupted,
+     the UIPainter may not be able to read the specification."
+
+    "
+     UIPainter new openOnClass:Tools::WebBrowserPage andSelector:#contentSpec
+     Tools::WebBrowserPage new openInterface:#contentSpec
+    "
+
+    <resource: #canvas>
+
+    ^ 
+     #(FullSpec
+        name: contentSpec
+        window: 
+       (WindowSpec
+          label: 'NewApplication'
+          name: 'NewApplication'
+          bounds: (Rectangle 0 0 300 300)
+        )
+        component: 
+       (SpecCollection
+          collection: (
+           (NonScrollableArbitraryComponentSpec
+              name: 'Content'
+              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
+              component: webKitView
+            )
+           )
+         
+        )
+      )
+!
+
 toolBarSpec
     "This resource specification was automatically generated
      by the UIPainter of ST/X."
@@ -239,10 +276,10 @@
                
               )
             )
-           (NonScrollableArbitraryComponentSpec
-              name: 'PageContents'
+           (UISubSpecification
+              name: 'Content'
               layout: (LayoutFrame 0 0 67 0 0 1 0 1)
-              component: webKitView
+              minorKey: contentSpec
             )
            )
          
@@ -293,6 +330,25 @@
       )
 ! !
 
+!WebBrowserPage class methodsFor:'plugIn spec'!
+
+aspectSelectors
+    "This resource specification was automatically generated
+     by the UIPainter of ST/X."
+
+    "Do not manually edit this. If it is corrupted,
+     the UIPainter may not be able to read the specification."
+
+    "Return a description of exported aspects;
+     these can be connected to aspects of an embedding application
+     (if this app is embedded in a subCanvas)."
+
+    ^ #(
+        #urlHolder
+      ).
+
+! !
+
 !WebBrowserPage methodsFor:'actions'!
 
 hideBookmarkBar
@@ -682,7 +738,7 @@
 !WebBrowserPage class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__WebBrowserPage.st,v 1.2 2011-07-03 17:47:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__WebBrowserPage.st,v 1.3 2011-08-10 23:45:39 vrany Exp $'
 !
 
 version_SVN