Artifact 28a95507a5857992aa9c6e5cbda44d04b9c0f10d:

File tools/tclfossil/tf part of check-in [2b9c6df430] - tclfossil: initial directory structure and package split up by mjanssen on 2008-02-19 18:05:51.

0000: 23 21 2f 62 69 6e 2f 73 68 0d 0a 23 23 20 2d 2a  #!/bin/sh..## -*
0010: 2d 20 74 63 6c 20 2d 2a 2d 20 5c 0d 0a 65 78 65  - tcl -*- \..exe
0020: 63 20 74 63 6c 73 68 20 22 24 30 22 20 24 7b 31  c tclsh "$0" ${1
0030: 2b 22 24 40 22 7d 0d 0a 0d 0a 23 20 23 20 23 23  +"$@"}....# # ##
0040: 20 23 23 23 20 23 23 23 23 23 20 23 23 23 23 23   ### ##### #####
0050: 23 23 23 20 23 23 23 23 23 23 23 23 23 23 23 23  ### ############
0060: 23 20 23 23 23 23 23 23 23 23 23 23 23 23 23 23  # ##############
0070: 23 23 23 23 23 23 23 0d 0a 23 23 20 43 6f 70 79  #######..## Copy
0080: 72 69 67 68 74 20 28 63 29 20 32 30 30 38 20 4d  right (c) 2008 M
0090: 61 72 6b 20 4a 61 6e 73 73 65 6e 2e 0d 0a 23 0d  ark Janssen...#.
00a0: 0a 23 20 54 68 69 73 20 73 6f 66 74 77 61 72 65  .# This software
00b0: 20 69 73 20 6c 69 63 65 6e 73 65 64 20 61 73 20   is licensed as 
00c0: 64 65 73 63 72 69 62 65 64 20 69 6e 20 74 68 65  described in the
00d0: 20 66 69 6c 65 20 4c 49 43 45 4e 53 45 2c 20 77   file LICENSE, w
00e0: 68 69 63 68 0d 0a 23 20 79 6f 75 20 73 68 6f 75  hich..# you shou
00f0: 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64  ld have received
0100: 20 61 73 20 70 61 72 74 20 6f 66 20 74 68 69 73   as part of this
0110: 20 64 69 73 74 72 69 62 75 74 69 6f 6e 2e 0d 0a   distribution...
0120: 23 0d 0a 23 20 54 68 69 73 20 73 6f 66 74 77 61  #..# This softwa
0130: 72 65 20 63 6f 6e 73 69 73 74 73 20 6f 66 20 76  re consists of v
0140: 6f 6c 75 6e 74 61 72 79 20 63 6f 6e 74 72 69 62  oluntary contrib
0150: 75 74 69 6f 6e 73 20 6d 61 64 65 20 62 79 20 6d  utions made by m
0160: 61 6e 79 0d 0a 23 20 69 6e 64 69 76 69 64 75 61  any..# individua
0170: 6c 73 2e 20 20 46 6f 72 20 65 78 61 63 74 20 63  ls.  For exact c
0180: 6f 6e 74 72 69 62 75 74 69 6f 6e 20 68 69 73 74  ontribution hist
0190: 6f 72 79 2c 20 73 65 65 20 74 68 65 20 72 65 76  ory, see the rev
01a0: 69 73 69 6f 6e 0d 0a 23 20 68 69 73 74 6f 72 79  ision..# history
01b0: 20 61 6e 64 20 6c 6f 67 73 2c 20 61 76 61 69 6c   and logs, avail
01c0: 61 62 6c 65 20 61 74 20 68 74 74 70 3a 2f 2f 66  able at http://f
01d0: 6f 73 73 69 6c 2d 73 63 6d 2e 68 77 61 63 69 2e  ossil-scm.hwaci.
01e0: 63 6f 6d 2f 66 6f 73 73 69 6c 0d 0a 23 20 23 20  com/fossil..# # 
01f0: 23 23 20 23 23 23 20 23 23 23 23 23 20 23 23 23  ## ### ##### ###
0200: 23 23 23 23 23 20 23 23 23 23 23 23 23 23 23 23  ##### ##########
0210: 23 23 23 20 23 23 23 23 23 23 23 23 23 23 23 23  ### ############
0220: 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a 23 23 20  #########....## 
0230: 43 6f 6d 6d 61 6e 64 20 6c 69 6e 65 20 61 70 70  Command line app
0240: 6c 69 63 61 74 69 6f 6e 20 77 72 61 70 70 65 64  lication wrapped
0250: 20 61 72 6f 75 6e 64 20 74 68 65 20 69 6d 70 6f   around the impo
0260: 72 74 20 70 61 63 6b 61 67 65 73 2e 0d 0a 0d 0a  rt packages.....
0270: 23 20 23 20 23 23 20 23 23 23 20 23 23 23 23 23  # # ## ### #####
0280: 20 23 23 23 23 23 23 23 23 20 23 23 23 23 23 23   ######## ######
0290: 23 23 23 23 23 23 23 20 23 23 23 23 23 23 23 23  ####### ########
02a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 0d 0a 23  #############..#
02b0: 23 20 52 65 71 75 69 72 65 6d 65 6e 74 73 2c 20  # Requirements, 
02c0: 65 78 74 65 6e 64 65 64 20 70 61 63 6b 61 67 65  extended package
02d0: 20 6d 61 6e 61 67 65 6d 65 6e 74 20 66 6f 72 20   management for 
02e0: 6c 6f 63 61 6c 20 70 61 63 6b 61 67 65 73 2e 0d  local packages..
02f0: 0a 0d 0a 3a 3a 74 63 6c 3a 3a 74 6d 3a 3a 70 61  ...::tcl::tm::pa
0300: 74 68 20 61 64 64 20 5b 66 69 6c 65 20 6e 6f 72  th add [file nor
0310: 6d 61 6c 69 7a 65 20 5b 66 69 6c 65 20 6a 6f 69  malize [file joi
0320: 6e 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20  n [file dirname 
0330: 5b 69 6e 66 6f 20 73 63 72 69 70 74 5d 5d 20 6c  [info script]] l
0340: 69 62 5d 5d 0d 0a 0d 0a 70 61 63 6b 61 67 65 20  ib]]....package 
0350: 72 65 71 75 69 72 65 20 54 63 6c 20 38 2e 35 20  require Tcl 8.5 
0360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0370: 3b 20 23 20 52 65 71 75 69 72 65 64 20 72 75 6e  ; # Required run
0380: 74 69 6d 65 2e 0d 0a 70 61 63 6b 61 67 65 20 72  time...package r
0390: 65 71 75 69 72 65 20 76 63 3a 3a 66 6f 73 73 69  equire vc::fossi
03a0: 6c 3a 3a 75 69 20 20 20 20 20 20 20 20 20 20 3b  l::ui          ;
03b0: 20 23 20 4d 61 69 6e 20 66 75 6e 63 74 69 6f 6e   # Main function
03c0: 61 6c 69 74 79 2e 0d 0a 0d 0a 23 20 23 20 23 23  ality.....# # ##
03d0: 20 23 23 23 20 23 23 23 23 23 20 23 23 23 23 23   ### ##### #####
03e0: 23 23 23 20 23 23 23 23 23 23 23 23 23 23 23 23  ### ############
03f0: 23 20 23 23 23 23 23 23 23 23 23 23 23 23 23 23  # ##############
0400: 23 23 23 23 23 23 23 0d 0a 23 23 20 45 78 65 63  #######..## Exec
0410: 75 74 69 6f 6e 0d 0a 0d 0a 76 63 3a 3a 66 6f 73  ution....vc::fos
0420: 73 69 6c 3a 3a 75 69 20 72 75 6e 20 24 3a 3a 61  sil::ui run $::a
0430: 72 67 76 30 20 7b 2a 7d 24 61 72 67 76 0d 0a 65  rgv0 {*}$argv..e
0440: 78 69 74 20 30 0d 0a 0d 0a 23 20 23 20 23 23 20  xit 0....# # ## 
0450: 23 23 23 20 23 23 23 23 23 20 23 23 23 23 23 23  ### ##### ######
0460: 23 23 20 23 23 23 23 23 23 23 23 23 23 23 23 23  ## #############
0470: 20 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23   ###############
0480: 23 23 23 23 23 23                                ######