Artifact 6725ddc0539f847d6dbd1b6cbe428ce91e05c84b:

File tools/cvs2fossil/lib/pkgIndex.tcl part of check-in [d57b7b4a05] - Re-added the user feedback and error reporting utilities, with modifications, and completed the handling of the informational options. by aku on 2007-10-02 05:33:09.

0000: 23 20 23 20 23 23 20 23 23 23 20 23 23 23 23 23  # # ## ### #####
0010: 20 23 23 23 23 23 23 23 23 20 23 23 23 23 23 23   ######## ######
0020: 23 23 23 23 23 23 23 20 23 23 23 23 23 23 23 23  ####### ########
0030: 23 23 23 23 23 23 23 23 23 23 23 23 23 0a 23 23  #############.##
0040: 20 50 61 63 6b 61 67 65 20 6d 61 6e 61 67 65 6d   Package managem
0050: 65 6e 74 2e 0a 23 23 20 49 6e 64 65 78 20 6f 66  ent..## Index of
0060: 20 74 68 65 20 6c 6f 63 61 6c 20 70 61 63 6b 61   the local packa
0070: 67 65 73 20 72 65 71 75 69 72 65 64 20 62 79 20  ges required by 
0080: 63 76 73 32 66 6f 73 73 69 6c 0a 23 20 23 20 23  cvs2fossil.# # #
0090: 23 20 23 23 23 20 23 23 23 23 23 20 23 23 23 23  # ### ##### ####
00a0: 23 23 23 23 20 23 23 23 23 23 23 23 23 23 23 23  #### ###########
00b0: 23 23 20 23 23 23 23 23 23 23 23 23 23 23 23 23  ## #############
00c0: 23 23 23 23 23 23 23 23 0a 69 66 20 7b 21 5b 70  ########.if {![p
00d0: 61 63 6b 61 67 65 20 76 73 61 74 69 73 66 69 65  ackage vsatisfie
00e0: 73 20 5b 70 61 63 6b 61 67 65 20 72 65 71 75 69  s [package requi
00f0: 72 65 20 54 63 6c 5d 20 38 2e 34 5d 7d 20 72 65  re Tcl] 8.4]} re
0100: 74 75 72 6e 0a 70 61 63 6b 61 67 65 20 69 66 6e  turn.package ifn
0110: 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c  eeded vc::fossil
0120: 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 20 20 20  ::import::cvs   
0130: 20 20 20 20 20 20 31 2e 30 20 5b 6c 69 73 74 20        1.0 [list 
0140: 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69  source [file joi
0150: 6e 20 24 64 69 72 20 63 76 73 32 66 6f 73 73 69  n $dir cvs2fossi
0160: 6c 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20  l.tcl]].package 
0170: 69 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f 73  ifneeded vc::fos
0180: 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73  sil::import::cvs
0190: 3a 3a 6f 70 74 69 6f 6e 20 31 2e 30 20 5b 6c 69  ::option 1.0 [li
01a0: 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20  st source [file 
01b0: 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 6f 70  join $dir c2f_op
01c0: 74 69 6f 6e 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61  tion.tcl]].packa
01d0: 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a  ge ifneeded vc::
01e0: 74 6f 6f 6c 73 3a 3a 74 72 6f 75 62 6c 65 20 20  tools::trouble  
01f0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2e 30 20              1.0 
0200: 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69  [list source [fi
0210: 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 74 72 6f  le join $dir tro
0220: 75 62 6c 65 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61  uble.tcl]].packa
0230: 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a  ge ifneeded vc::
0240: 74 6f 6f 6c 73 3a 3a 6c 6f 67 20 20 20 20 20 20  tools::log      
0250: 20 20 20 20 20 20 20 20 20 20 20 20 31 2e 30 20              1.0 
0260: 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69  [list source [fi
0270: 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 6c 6f 67  le join $dir log
0280: 2e 74 63 6c 5d 5d 0a                             .tcl]].