--- 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