--- a/Workspace.st Wed Mar 07 14:35:45 2012 +0100
+++ b/Workspace.st Wed Mar 07 17:53:22 2012 +0100
@@ -1972,11 +1972,16 @@
!Workspace methodsFor:'queries'!
isWorkspace
+ "back-query from the compiler to ask if this is an interactive view
+ (for error feedback)"
+
^ true
+
+ "Modified (comment): / 07-03-2012 / 17:52:59 / cg"
! !
!Workspace class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.242 2012-03-04 12:55:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.243 2012-03-07 16:53:22 cg Exp $'
! !