Differences From:

File tools/import-cvs.tcl part of check-in [9671b65174] - Continued restructuring of the code (namespace hierarchy, import control). by aku on 2007-09-13 05:43:56. [view]

To:

File tools/import-cvs.tcl part of check-in [7b2619b7ef] - Unhacked the fossil backend. IOW reworked the API and made it nicer, more structured, better command and option names. Gave the internals more structure, and simplified the handling of -breakat (old -stopat breakpoint). Updated users, and updated the user visible switches as well. Added a -h switch for help. by aku on 2007-09-13 08:02:26. [view]

@@ -67,13 +67,14 @@
 
     clinit
     while {[string match "-*" [set opt [this]]]} {
 	switch -exact -- $opt {
-	    --nosign      {        import::configure -nosign      1 }
-	    --debugcommit {        import::configure -debugcommit 1 }
-	    --stopat      { next ; import::configure -stopat [this] }
+	    --breakat     { next ; import::configure -breakat [this] }
+	    --nosign      {        import::configure -nosign       1 }
+	    --saveto      { next ; import::configure -saveto  [file normalize [this]] }
 	    -v            { incr verbosity ; ::vc::tools::log::verbosity $verbosity }
-	    default usage
+	    -h            -
+	    default       usage
 	}
 	next
     }
 
@@ -120,14 +121,20 @@
 }
 
 proc usage {{text {}}} {
     global argv0
-    puts stderr "Usage: $argv0 ?--nosign? ?-v? ?--stopat id? ?--debugcommit? cvs-repository fossil-repository"
-    if {$text eq ""} return
-    puts stderr "       $text"
+    puts stderr "Usage: $argv0 ?-v? ?--nosign? ?--breakat id? ?--saveto path? cvs-repository fossil-repository"
+    if {$text eq ""} {
+	puts stderr "       --nosign:  Do not sign the imported changesets."
+	puts stderr "       --breakat: Stop just before committing the identified changeset."
+	puts stderr "       --saveto:  Save commit command to the specified file."
+	puts stderr "       -v:        Increase log verbosity. Can be used multiple times."
+    } else {
+	puts stderr "       $text"
+    }
     exit
 }
 
 # -----------------------------------------------------------------------------
 
 main
 exit