--- a/LoadInProgressQuery.st	Tue Mar 12 18:21:44 2019 +0100
+++ b/LoadInProgressQuery.st	Tue Mar 12 18:22:02 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2015 by Claus Gittinger / eXept Software AG
               All Rights Reserved
@@ -48,12 +50,14 @@
 !LoadInProgressQuery class methodsFor:'answering queries during load'!
 
 answerNotifyLoadingDo:aBlock
-    [
+    ^ [
         Smalltalk changed:#preLoad.
         self answer:true do:aBlock
     ] ensure:[
         Smalltalk changed:#postLoad
     ].
+
+    "Modified: / 12-03-2019 / 18:01:11 / Stefan Vogel"
 ! !
 
 !LoadInProgressQuery methodsFor:'defaults'!