--- a/IsDebuggingQuery.st	Tue Dec 30 13:39:44 2014 +0100
+++ b/IsDebuggingQuery.st	Tue Dec 30 13:39:56 2014 +0100
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libbasic' }"
 
+"{ NameSpace: Smalltalk }"
+
 Query subclass:#IsDebuggingQuery
 	instanceVariableNames:''
 	classVariableNames:''
@@ -52,16 +54,18 @@
 !IsDebuggingQuery methodsFor:'default values'!
 
 defaultResumeValue
+    "the default answer, if no one handles the query"
+
     ^ false
 ! !
 
 !IsDebuggingQuery class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/IsDebuggingQuery.st,v 1.3 2014-11-29 18:16:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/IsDebuggingQuery.st,v 1.4 2014-12-30 12:39:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/IsDebuggingQuery.st,v 1.3 2014-11-29 18:16:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/IsDebuggingQuery.st,v 1.4 2014-12-30 12:39:56 cg Exp $'
 ! !