--- a/GenericException.st	Tue Jul 25 17:12:35 2017 +0200
+++ b/GenericException.st	Tue Jul 25 17:14:44 2017 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -603,8 +605,8 @@
     ^ self defaultAnswer
 
     "Modified: / 15-06-1998 / 21:27:37 / cg"
-    "Modified: / 25-07-1999 / 23:15:16 / stefan"
     "Modified: / 11-03-2015 / 11:26:45 / sr"
+    "Modified: / 25-07-2017 / 16:45:41 / stefan"
 !
 
 raiseErrorString:aString
@@ -2464,10 +2466,11 @@
 !
 
 isQuery
-    ^ self class isQuery
+    ^ self creator isQuerySignal
 
     "Created: / 21-07-2017 / 00:43:38 / cg"
     "Modified: / 21-07-2017 / 20:27:24 / cg"
+    "Modified: / 25-07-2017 / 16:52:34 / stefan"
 ! !
 
 !GenericException class methodsFor:'documentation'!