SHA1 Hash:	a25bafb76a56dd2d184212b7570eb923c5bb028a
Date:	2008-02-14 04:27:42
User:	aku
Comment:	Bugfix. Allow for removal of a path from a workspace which was not added to the workspace yet. Issue a warning when encontering this.
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_wsstate.tcl from [f84a18f068] to [7ce7d95914].

@@ -46,11 +46,15 @@
 
 	foreach {rid path label rop} $oprevisioninfo {
 	    log write 5 wss {$myop($rop) $label}
 
 	    if {$rop < 0} {
-		unset mystate($path)
+		if {[catch {
+		    unset mystate($path)
+		}]} {
+		    log write 0 wss "Removed path \"$path\" is not known to the workspace"
+		}
 	    } else {
 		set mystate($path) [list $rid $label]
 	    }
 	}
 	return