1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
Description: Define a data folder dir and point eco files to it.
Author: Jose G. López <josgalo@gmail.com>
Last-Update: 2016-08-06
--- a/tcl/start.tcl
+++ b/tcl/start.tcl
@@ -104,11 +104,12 @@
set scidShareDir [file normalize "$scidTclDir/../"]
}
set scidImgDir [file nativename [file join $scidShareDir "img"]]
+ set scidDebDataDir [file nativename [file join $scidShareDir "data"]]
#Default values, can be overwritten by file option
set scidBooksDir [file nativename [file join $scidShareDir "books"]]
set scidBasesDir [file nativename [file join $scidShareDir "bases"]]
- set ecoFile [file nativename [file join $scidShareDir "scid.eco"]]
+ set ecoFile [file nativename [file join $scidDebDataDir "scid.eco"]]
proc moveOldConfigFiles {} {
# Moves configuration files from the old (3.4 and earlier) names
|
