--- a/QuerySignal.st	Fri Jul 21 00:44:05 2017 +0200
+++ b/QuerySignal.st	Fri Jul 21 00:44:32 2017 +0200
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libbasic' }"
 
+"{ NameSpace: Smalltalk }"
+
 Signal subclass:#QuerySignal
 	instanceVariableNames:'defaultAnswer hasDefault'
 	classVariableNames:''
@@ -425,6 +427,14 @@
     ^ false
 !
 
+isQuery
+    "return true, if this is a querySignal - always return true here"
+
+    ^ true
+
+    "Created: / 21-07-2017 / 00:44:23 / cg"
+!
+
 isQuerySignal
     "return true, if this is a querySignal - always return true here"
 
@@ -510,10 +520,10 @@
 !QuerySignal class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.48 2013-08-22 13:01:24 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.48 2013-08-22 13:01:24 cg Exp $'
+    ^ '$Header$'
 ! !