--- a/ProgrammingLanguage.st	Fri Nov 25 15:06:58 2016 +0100
+++ b/ProgrammingLanguage.st	Fri Nov 25 15:49:39 2016 +0100
@@ -58,10 +58,12 @@
             QuerySignal new
                 nameClass:self message:#languageQuerySignal;
                 notifierString:'asking for current language';
-                handlerBlock:[:ex | ex proceedWith:SmalltalkLanguage instance].
+                handlerBlock:[:ex | ex proceedWith:SmalltalkLanguage instance];
+                yourself.
 
     "Created: / 12-08-2009 / 14:56:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 16-08-2009 / 10:36:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 25-11-2016 / 15:48:19 / cg"
 ! !
 
 !ProgrammingLanguage class methodsFor:'instance creation'!