tkcvs/tkcvs-8.1-paths.patch

25 lines
736 B
Diff

--- tkcvs_8_1/tkcvs/tkcvs.tcl 2007-11-03 07:09:35.000000000 +0100
+++ tkcvs_8_1/tkcvs/tkcvs.tcl-gil 2008-07-30 03:41:35.000000000 +0200
@@ -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