Differences From:

File tools/cvs2fossil/lib/c2f_pcollar.tcl part of check-in [a10f654ac7] - Added more checks to pass I looking for possible file/directory conflicts in the repository, and modified traverser to report on and ignore sub directories of Attic's. by aku on 2007-10-10 05:36:27. [view]

To:

File tools/cvs2fossil/lib/c2f_pcollar.tcl part of check-in [27470a9304] - Extended pass I to capture the 'file executable' info of rcs archives. Currently the only way to store this info in the destination will be the use of fossil tags. by aku on 2007-10-13 21:15:30. [view]

@@ -73,8 +73,9 @@
 	    fid     INTEGER  NOT NULL  PRIMARY KEY AUTOINCREMENT,
 	    pid     INTEGER  NOT NULL  REFERENCES project,       -- project the file belongs to
 	    name    TEXT     NOT NULL,
 	    visible TEXT     NOT NULL,
+	    exec    INTEGER  NOT NULL, -- boolean, 'file executable'.
 	    UNIQUE (pid, name)         -- file names are unique within a project
 	}
 	return
     }
@@ -109,9 +110,9 @@
 		    continue
 		}
 
 		log write 4 collar "Found   $rcs"
-		$project add $rcs $usr
+		$project addfile $rcs $usr [file executable $rcs]
 
 		incr n
 		if {[log verbosity?] < 4} {
 		    log progress 0 collar $n {}