SHA1 Hash:	67600f777bb412f6205a3e9adf15221abbd8f792
Date:	2007-11-14 05:08:43
User:	aku
Comment:	Fixed handling of project objects when persisting them. Fill the project map. This is needed if the pass is not skipped. For the skip case we already initialize the project map when 'load'ing from the state.
Timelines:	ancestors | descendants | both | trunk
Other Links:	files | ZIP archive | manifest

• branch=trunk inherited from [a28c83647d]
• sym-trunk inherited from [a28c83647d]

Modified tools/cvs2fossil/lib/c2f_repository.tcl from [af48ae3168] to [fccbbea0d2].

@@ -131,12 +131,16 @@
 	return
     }
 
     # pass I persistence
     typemethod persist {} {
+	::variable myprojmap
 	state transaction {
-	    foreach p [TheProjects] { $p persist }
+	    foreach p [TheProjects] {
+		$p persist
+		set myprojmap([$p id]) $p
+	    }
 	}
 	return
     }
 
     typemethod load {} {