Tk-Components

Hex Artifact Content
Login

Artifact 7d201043c5ec54804371bd7549e6ff8154156782:


0000: 23 0a 23 20 54 63 6c 20 70 61 63 6b 61 67 65 20  #.# Tcl package 
0010: 69 6e 64 65 78 20 66 69 6c 65 0a 23 0a 23 69 66  index file.#.#if
0020: 20 7b 5b 63 61 74 63 68 20 7b 70 61 63 6b 61 67   {[catch {packag
0030: 65 20 72 65 71 75 69 72 65 20 54 63 6c 20 38 2e  e require Tcl 8.
0040: 32 7d 5d 7d 20 72 65 74 75 72 6e 0a 23 70 61 63  2}]} return.#pac
0050: 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 4d 61  kage ifneeded Ma
0060: 63 43 61 72 62 6f 6e 50 72 69 6e 74 20 40 50 41  cCarbonPrint @PA
0070: 43 4b 41 47 45 5f 56 45 52 53 49 4f 4e 40 20 5c  CKAGE_VERSION@ \
0080: 0a 20 23 20 20 20 5b 6c 69 73 74 20 6c 6f 61 64  . #   [list load
0090: 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72   [file join $dir
00a0: 20 40 50 4b 47 5f 4c 49 42 5f 46 49 4c 45 40 5d   @PKG_LIB_FILE@]
00b0: 20 40 50 41 43 4b 41 47 45 5f 4e 41 4d 45 40 5d   @PACKAGE_NAME@]
00c0: 0a 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64  ..package ifneed
00d0: 65 64 20 40 50 41 43 4b 41 47 45 5f 4e 41 4d 45  ed @PACKAGE_NAME
00e0: 40 20 40 50 41 43 4b 41 47 45 5f 56 45 52 53 49  @ @PACKAGE_VERSI
00f0: 4f 4e 40 20 22 0a 20 20 20 20 70 61 63 6b 61 67  ON@ ".    packag
0100: 65 20 72 65 71 75 69 72 65 20 54 6b 20 38 2e 35  e require Tk 8.5
0110: 2d 0a 20 20 20 20 69 66 20 7b 5c 22 41 70 70 4b  -.    if {\"AppK
0120: 69 74 5c 22 20 6e 69 20 5c 5b 77 69 6e 66 6f 20  it\" ni \[winfo 
0130: 73 65 72 76 65 72 20 2e 5c 5d 7d 20 7b 65 72 72  server .\]} {err
0140: 6f 72 20 7b 54 6b 41 71 75 61 20 43 6f 63 6f 61  or {TkAqua Cocoa
0150: 20 72 65 71 75 69 72 65 64 7d 7d 0a 20 20 20 20   required}}.    
0160: 5b 6c 69 73 74 20 6c 6f 61 64 20 5b 66 69 6c 65  [list load [file
0170: 20 6a 6f 69 6e 20 24 64 69 72 20 40 50 4b 47 5f   join $dir @PKG_
0180: 4c 49 42 5f 46 49 4c 45 40 5d 20 40 50 41 43 4b  LIB_FILE@] @PACK
0190: 41 47 45 5f 4e 41 4d 45 40 5d 22                 AGE_NAME@]"