1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
###################
# config.tcl: Some embedded configuration for Scid
namespace eval ::config {}
if {$windowsOS} {
set scidShareDir $scidExeDir
} else {
set scidShareDir "@SHAREDIR@"
}
if {![info exists scidBooksDir]} {
set scidBooksDir [file nativename [file join $scidShareDir "books"]]
}
if {![info exists scidBasesDir]} {
set scidBasesDir [file nativename [file join $scidShareDir "bases"]]
}
# ecoFile: the ECO file for opening classification. Scid will try to load
# this first, and if that fails, it will try to load "scid.eco" in the
# current directory.
if {$ecoFile == ""} {
if {$windowsOS} {
set ecoFile [file join $scidDataDir "scid.eco"]
} else {
set ecoFile [file join [file join $scidShareDir "data"] "scid.eco"]
}
}
|
