Diff
Not logged in

Differences From:

File tools/lib/cvs.tcl part of check-in [00228d1547] - Continuing namespace changes, cvs frontend. by aku on 2007-09-13 06:22:29. [view]

To:

File tools/lib/cvs.tcl part of check-in [d4aa7da67d] - Continuing namespace changes, rcs parser. Basic structure is now ok IMHO. by aku on 2007-09-13 06:24:31. [view]

@@ -4,16 +4,17 @@
 # -----------------------------------------------------------------------------
 # Requirements
 
 package require Tcl 8.4
-package require fileutil       ; # Tcllib (traverse directory hierarchy)
-package require rcsparser      ; # Handling the RCS archive files.
-package require vc::tools::log ; # User feedback
+package require fileutil        ; # Tcllib (traverse directory hierarchy)
+package require vc::rcs::parser ; # Handling the RCS archive files.
+package require vc::tools::log  ; # User feedback
 package require struct::tree
 
 namespace eval ::vc::cvs::ws {
     vc::tools::log::system cvs
     namespace import ::vc::tools::log::write
+    namespace import ::vc::rcs::parser::process
 }
 
 # -----------------------------------------------------------------------------
 # API
@@ -82,9 +83,9 @@
 	    }
 	}
 
 	# Get the meta data we need (revisions, timeline, messages).
-	set meta [::rcsparser::process $base/$rcs]
+	set meta [process $base/$rcs]
 
 	set npaths($rcs) $f
 	set rpaths($f) $rcs