Differences From:
File tools/cvs2fossil/lib/c2f_fossil.tcl part of check-in [e60ba15821] - Added log output to make the log during file import more complete. by aku on 2008-01-27 20:43:58. [view]
To:
File tools/cvs2fossil/lib/c2f_fossil.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]
@@ -31,13 +31,13 @@ constructor {} { set myrepository [fileutil::tempfile cvs2fossil_repo_] set myworkspace [fileutil::tempfile cvs2fossil_wspc_] - file delete $myworkspace - file mkdir $myworkspace - - Do new $myrepository - $self InWorkspace ; Do open $myrepository + ::file delete $myworkspace + ::file mkdir $myworkspace + + Do new [::file nativename $myrepository] + $self InWorkspace ; Do open [::file nativename $myrepository] $self RestorePwd return } @@ -95,10 +95,10 @@ return [array get id] } method finalize {destination} { - file rename -force $myrepository $destination - file delete -force $myworkspace + ::file rename -force $myrepository $destination + ::file delete -force $myworkspace $self destroy return }