VDBSettingsApplication.st
changeset 202 8064029822c5
parent 175 a304c250e889
child 203 6fd080fc5ee3
--- a/VDBSettingsApplication.st	Tue Nov 17 15:24:47 2020 +0000
+++ b/VDBSettingsApplication.st	Mon Nov 16 22:21:57 2020 +0000
@@ -1,6 +1,7 @@
 "
 jv:vdb - Visual / VM Debugger
 Copyright (C) 2015-now Jan Vrany
+Copyright (C) 2020 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) 2020 LabWare
 
 This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
 
@@ -287,9 +289,18 @@
 !VDBSettingsApplication methodsFor:'actions'!
 
 doEditGDBinit
-    VDBScatchPadApplication openOnFile:VDBDebuggerApplication gdbUserInitFile
+    | file |
+
+    file := VDBDebuggerApplication gdbUserInitFile.
+    file exists ifFalse: [
+        file directory isWritable ifTrue: [
+            file createAsEmptyFile.
+        ].
+    ].
+    VDBScatchPadApplication openOnFile:file
 
     "Modified: / 21-06-2019 / 10:10:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 16-11-2020 / 22:17:14 / Jan Vrany <jan.vrany@labware.com>"
 !
 
 doEditVDBinit
@@ -321,7 +332,9 @@
     workspace syntax:SmalltalkLanguage instance.
     workspace open.
     workspace window 
-        label:(resources string:'.vdbinit.st - User : vdbinit.st - Default')
+        label:(resources string:'.vdbinit.st - User     :     vdbinit.st - Default')
+
+    "Modified: / 16-11-2020 / 22:21:11 / Jan Vrany <jan.vrany@labware.com>"
 !
 
 doSelectExecutable