blob: fa34a8d280d6a2e601e9aa4dc8f768d4af5e9904 (
plain)
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
30
31
|
--- tcl/start.tcl.old 2006-09-08 00:13:23.000000000 +0200
+++ tcl/start.tcl 2006-09-08 00:15:06.000000000 +0200
@@ -16,7 +16,7 @@
# The "\" at the end of the comment line below is necessary! It means
# that the "exec" line is a comment to Tcl/Tk, but not to /bin/sh.
# The next line restarts using tkscid: \
-exec tkscid "$0" "$@"
+TCLLIBPATH="@snack_path@ $TCLLIBPATH" exec tkscid "$0" "$@"
# For the above to work, tkscid must be in a directory in your PATH.
# Alternatively, you can set the first line to start tkscid directly
@@ -597,7 +597,7 @@
### Audio move announcement options:
-set ::utils::sound::soundFolder [file nativename [file join $::scidExeDir sounds]]
+set ::utils::sound::soundFolder [file nativename [file join @GENTOO_DATA@ sounds]]
set ::utils::sound::announceNew 0
set ::utils::sound::announceForward 0
set ::utils::sound::announceBack 0
--- tcl/utils/sound.tcl.old 2006-09-08 00:26:02.000000000 +0200
+++ tcl/utils/sound.tcl 2006-09-08 00:26:19.000000000 +0200
@@ -38,7 +38,7 @@
variable soundFolder
::splash::add "Setting up audio move announcement..."
- if {[catch {package require snack 2.0}]} {
+ if {[catch {package require snack}]} {
set hasSnackPackage 0
::splash::add " Move speech disabled - Snack sound package not found"
return
|
GitWeb
