Fossil

Check-in [0d02fe6c]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Report destination file for repository, and fix bug with the naming of the destination triggered when importing a repository in toto.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:0d02fe6c7a8ed0f08e3eced93cc47a2235792c26
User & Date: aku 2008-02-12 04:25:34
Context
2008-02-12
05:39
Time information extended to include a total summed over all passes. Output extended to include formatted time data (hours, minutes, seconds). check-in: 7817ff22 user: aku tags: trunk
04:25
Report destination file for repository, and fix bug with the naming of the destination triggered when importing a repository in toto. check-in: 0d02fe6c user: aku tags: trunk
04:24
Added code to skip of administrative .cvsignore files. Added code to detect and warn about dot files (.FOO). Allow the user to import dot files by converting their names to non-dot form (.FOO -> dot-FOO). check-in: c1dc8701 user: aku tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to tools/cvs2fossil/lib/c2f_fossil.tcl.

138
139
140
141
142
143
144


145
146
147
148
149
150
151

    method finalize {destination} {
	Do rebuild [::file nativename $myrepository]

	::file rename -force $myrepository $destination
	::file delete -force $myworkspace
	$self destroy


	return
    }

    # # ## ### ##### ######## #############
    ##

    typemethod setlocation {path} {







>
>







138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153

    method finalize {destination} {
	Do rebuild [::file nativename $myrepository]

	::file rename -force $myrepository $destination
	::file delete -force $myworkspace
	$self destroy

	log write 2 fossil {destination $destination}
	return
    }

    # # ## ### ##### ######## #############
    ##

    typemethod setlocation {path} {

Changes to tools/cvs2fossil/lib/c2f_pimport.tcl.

101
102
103
104
105
106
107






108
109
110
111
112
113
114
115
	    }

	    $rstate destroy

	    # At last copy the temporary repository file to its final
	    # destination and release the associated memory.







	    $fossil finalize [$project base].fsl
	}

	# This does not live beyond the pass. We use the state for the
	# data despite its transient nature to keep the memory
	# requirements down.
	#state discard revuuid
	return







>
>
>
>
>
>
|







101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
	    }

	    $rstate destroy

	    # At last copy the temporary repository file to its final
	    # destination and release the associated memory.

	    set destination [$project base]
	    if {$destination eq ""} {
		set destination [file tail [repository base?]]
	    }
	    append destination .fsl

	    $fossil finalize $destination
	}

	# This does not live beyond the pass. We use the state for the
	# data despite its transient nature to keep the memory
	# requirements down.
	#state discard revuuid
	return