--- a/DebugView.st	Mon Feb 23 18:16:25 2015 +0100
+++ b/DebugView.st	Tue Feb 24 00:48:06 2015 +0100
@@ -7373,7 +7373,9 @@
         con := aContext.
         calledContext := nil.
 
-        alreadyInApplicationCode := con receiver isKindOf:ApplicationModel.
+        alreadyInApplicationCode := 
+                con receiver isLazyValue not     "/ careful to not force futures/lazy values
+                and:[con receiver isKindOf:ApplicationModel].
 
         verboseBacktrace ~~ true ifTrue:[
             "/ with dense backtrace, hide the ProcessorScheduler
@@ -7479,7 +7481,8 @@
                     isStoppedInModalDialog := true.
                 ] ifFalse:[
                     alreadyInApplicationCode ifFalse:[
-                        (con receiver isKindOf:ApplicationModel) ifTrue:[
+                        (con receiver isLazyValue not  "/ careful to not force futures/lazy values
+                        and:[con receiver isKindOf:ApplicationModel]) ifTrue:[
                             isStoppedInApplicationAction := true.
                         ]
                     ]
@@ -9523,15 +9526,15 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.684 2015-02-16 12:05:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.685 2015-02-23 23:48:06 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.684 2015-02-16 12:05:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.685 2015-02-23 23:48:06 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: DebugView.st,v 1.684 2015-02-16 12:05:28 cg Exp $'
+    ^ '$Id: DebugView.st,v 1.685 2015-02-23 23:48:06 cg Exp $'
 ! !