VDBAbstractApplication.st
changeset 209 c368a74adb70
parent 164 364ebdd1d42c
child 228 757414c2bd1e
--- a/VDBAbstractApplication.st	Thu Dec 10 20:28:06 2020 +0000
+++ b/VDBAbstractApplication.st	Tue Mar 09 11:41:55 2021 +0000
@@ -1,6 +1,7 @@
 "
 jv:vdb - Visual / VM Debugger
 Copyright (C) 2015-now Jan Vrany
+Copyright (C) 2021 LabWare
 
 This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
 
@@ -23,6 +24,7 @@
 "
 jv:vdb - Visual / VM Debugger
 Copyright (C) 2015-now Jan Vrany
+Copyright (C) 2021 LabWare
 
 This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
 
@@ -219,6 +221,15 @@
     ^ titleHolder
 
     "Modified: / 03-10-2018 / 15:36:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+titleHolder: aValueHolder
+    titleHolder := aValueHolder.
+    (window notNil and: [window isTopView and:[window respondsTo: #labelChannel:]]) ifTrue: [
+        window labelChannel: titleHolder
+    ].
+
+    "Modified: / 08-03-2021 / 19:21:15 / Jan Vrany <jan.vrany@labware.com>"
 ! !
 
 !VDBAbstractApplication methodsFor:'binding access'!