--- tkcvs_8_0_4/tkcvs/tkcvs.tcl.paths	2007-04-27 05:19:36.000000000 +0200
+++ tkcvs_8_0_4/tkcvs/tkcvs.tcl	2009-03-21 17:21:48.000000000 +0100
@@ -59,8 +59,8 @@
 }
 #puts "TclRoot $TclRoot"
 
-set TCDIR [file join $TclRoot tkcvs]
-set cvscfg(bitmapdir) [file join $TclRoot tkcvs bitmaps]
+set TCDIR "/usr/share/tkcvs"
+set cvscfg(bitmapdir) "/usr/share/tkcvs/bitmaps"
 #puts "TCDIR $TCDIR"
 #puts "BITMAPDIR $cvscfg(bitmapdir)"
 
@@ -89,8 +89,8 @@
 }
 
 # Read in defaults
-if {[file exists [file join $TCDIR tkcvs_def.tcl]]} {
-  source [file join $TCDIR tkcvs_def.tcl]
+if {[file exists [file join /etc/cvs tkcvs_def.tcl]]} {
+  source [file join /etc/cvs tkcvs_def.tcl]
 }
 
 # This helps us recover from a problem left behind by tkcvs 7.2