--- a/QuerySig.st	Sat Sep 02 18:08:30 1995 +0200
+++ b/QuerySig.st	Sun Sep 03 17:06:58 1995 +0200
@@ -35,7 +35,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Attic/QuerySig.st,v 1.1 1995-09-02 16:08:30 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/QuerySig.st,v 1.2 1995-09-03 15:06:01 claus Exp $
 "
 !
 
@@ -60,7 +60,7 @@
 
     |s|
 
-    aSignal isQuery ifFalse:[^ false].
+    aSignal isQuerySignal ifFalse:[^ false].
 
     s := aSignal.
     [s notNil] whileTrue:[