--- a/ApplicationModel.st	Mon Nov 03 14:22:48 2008 +0100
+++ b/ApplicationModel.st	Wed Nov 05 16:07:40 2008 +0100
@@ -1766,6 +1766,12 @@
 
     |window sensor|
 
+
+    self isWebService ifTrue:[
+        self breakPoint:#sr.
+        ^ self
+    ].
+
     (window := self window) notNil ifTrue:[
         sensor := window sensor.
     ].
@@ -3424,7 +3430,7 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.270 2008-10-26 12:09:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.271 2008-11-05 15:07:40 sr Exp $'
 ! !
 
 ApplicationModel initialize!