ResourceSpecEditor.st
changeset 2748 03b9b57d2076
parent 2693 63c153f0ce90
child 2874 6a5590e8b647
--- a/ResourceSpecEditor.st	Mon Sep 21 22:05:34 2009 +0200
+++ b/ResourceSpecEditor.st	Mon Sep 21 22:45:00 2009 +0200
@@ -13,7 +13,7 @@
 
 ToolApplicationModel subclass:#ResourceSpecEditor
 	instanceVariableNames:'specClass specClassName specSelector aspects modified hasSaved
-		tabSelection'
+		tabSelection isEmbeddedInBrowser'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Interface-Framework'
@@ -161,6 +161,14 @@
     self modified:false
 !
 
+isEmbeddedInBrowser
+    ^ isEmbeddedInBrowser ? false
+!
+
+isEmbeddedInBrowser:something
+    isEmbeddedInBrowser := something.
+!
+
 modified       
     "returns whether the resource spec was modified"
 
@@ -775,5 +783,5 @@
 !ResourceSpecEditor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ResourceSpecEditor.st,v 1.47 2009-07-09 18:07:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ResourceSpecEditor.st,v 1.48 2009-09-21 20:45:00 cg Exp $'
 ! !