VDBFrameApplication.st
changeset 191 d540bf90c8f7
parent 154 26937faa5a97
child 193 e6393500a665
--- a/VDBFrameApplication.st	Sun Dec 01 23:43:00 2019 +0000
+++ b/VDBFrameApplication.st	Fri May 22 14:42:47 2020 +0100
@@ -171,7 +171,7 @@
 !VDBFrameApplication methodsFor:'change & update'!
 
 enqueueDelayedUpdateRegisterList
-    self enqueueMessage:#delayedpdateRegisterList
+    self enqueueMessage:#delayedUpdateRegisterList
 
     "Created: / 01-10-2018 / 10:06:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 18-02-2019 / 10:23:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -200,6 +200,25 @@
 
 !VDBFrameApplication methodsFor:'change & update-delayed'!
 
+delayedUpdateRegisterList
+    | frame  list |
+
+    debugger isNil ifTrue:[
+        self registerListHolder value:#().
+        ^ self.
+    ].
+    frame := frameHolder value.
+    frame isNil ifTrue:[
+        self registerListHolder value:#().
+        ^ self.
+    ].
+    list := frame registers.
+    self registerListHolder value:list.
+
+    "Created: / 01-10-2018 / 10:07:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 22-05-2020 / 13:32:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 delayedUpdateVariableObjectList
     | frame  list |
 
@@ -223,24 +242,6 @@
 
     "Created: / 03-02-2018 / 07:30:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 05-07-2018 / 11:57:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-delayedpdateRegisterList
-    | frame  list |
-
-    debugger isNil ifTrue:[
-        self registerListHolder value:#().
-        ^ self.
-    ].
-    frame := frameHolder value.
-    frame isNil ifTrue:[
-        self registerListHolder value:#().
-        ^ self.
-    ].
-    list := frame registers.
-    self registerListHolder value:list.
-
-    "Created: / 01-10-2018 / 10:07:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !VDBFrameApplication methodsFor:'initialization & release'!