Differences From:

File tools/cvs2fossil/lib/c2f_pcollrev.tcl part of check-in [6809145eb1] - More comments on sql statements. by aku on 2008-01-19 06:07:49. [view]

To:

File tools/cvs2fossil/lib/c2f_pcollrev.tcl part of check-in [7208c7ac4d] - Changes to cvs2fossil to import tcllib CVS into fossil on Win32

* using ::file instead of file in snit methods to get the core file command * taking care of files that only differ in case in the Attic and the repo on case insensitive FS * passing platform specific

by mjanssen on 2008-01-28 23:57:27. [view]

@@ -317,16 +317,16 @@
 	# functionality of the pass.
 
 	set rbase [repository base?]
 	foreach project [repository projects] {
-	    set base [file join $rbase [$project base]]
+	    set base [::file join $rbase [$project base]]
 	    log write 1 collrev "Processing $base"
 
 	    foreach file [$project files] {
 		set path [$file path]
 		log write 2 collrev "Parsing $path"
 		if {[catch {
-		    parser process [file join $base $path] $file
+		    parser process [::file join $base $path] $file
 		} msg]} {
 		    global errorCode
 		    if {$errorCode eq "vc::rcs::parser"} {
 			trouble fatal "$path is not a valid RCS archive ($msg)"