hg/stx-libbasic: changeset 8693:e9543a43bb71

author	Stefan Vogel <sv@exept.de>
	Fri, 21 Jan 2005 18:11:51 +0100
changeset 8693	e9543a43bb71
parent 8692	3abb4811f5b2
child 8694	64a59d1b803c

When sending #query do a shortcut for #answer:do: - contexts if the signal is #accepts: -ted. (super #raiseRequest was sent her, but it led to an error in #doCallHandler:, so it didn't work for a long time).

--- a/QuerySignal.st	Fri Jan 21 18:10:30 2005 +0100
+++ b/QuerySignal.st	Fri Jan 21 18:11:51 2005 +0100
@@ -471,7 +471,7 @@
                 self error:'nil receiver in #answer:do: - send'.
             ].
             (sig accepts:self) ifTrue:[
-                ^ super raiseRequest
+                ^ con argAt:1
             ].
         ] ifFalse:[
             (sel ~~ #handle:do:
@@ -499,5 +499,5 @@
 !QuerySignal class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.39 2005-01-21 10:33:05 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.40 2005-01-21 17:11:51 stefan Exp $'
 ! !