@@ -223,9 +223,9 @@ def library_recipes():
223223 if internalTk ():
224224 result .extend ([
225225 dict (
226- name = "Tcl 8.6.8 " ,
227- url = "ftp://ftp.tcl.tk/pub/tcl//tcl8_6/tcl8.6.8 -src.tar.gz" ,
228- checksum = '81656d3367af032e0ae6157eff134f89 ' ,
226+ name = "Tcl 8.6.9 " ,
227+ url = "ftp://ftp.tcl.tk/pub/tcl//tcl8_6/tcl8.6.9 -src.tar.gz" ,
228+ checksum = 'aa0a121d95a0e7b73a036f26028538d4 ' ,
229229 buildDir = "unix" ,
230230 configure_pre = [
231231 '--enable-shared' ,
@@ -239,12 +239,9 @@ def library_recipes():
239239 },
240240 ),
241241 dict (
242- name = "Tk 8.6.8" ,
243- url = "ftp://ftp.tcl.tk/pub/tcl//tcl8_6/tk8.6.8-src.tar.gz" ,
244- checksum = '5e0faecba458ee1386078fb228d008ba' ,
245- patches = [
246- "tk868_on_10_8_10_9.patch" ,
247- ],
242+ name = "Tk 8.6.9.1" ,
243+ url = "ftp://ftp.tcl.tk/pub/tcl//tcl8_6/tk8.6.9.1-src.tar.gz" ,
244+ checksum = '9efe3976468352dc894dae0c4e785a8e' ,
248245 buildDir = "unix" ,
249246 configure_pre = [
250247 '--enable-aqua' ,
@@ -706,6 +703,7 @@ def extractArchive(builddir, archiveName):
706703 work for current Tcl and Tk source releases where the basename of
707704 the archive ends with "-src" but the uncompressed directory does not.
708705 For now, just special case Tcl and Tk tar.gz downloads.
706+ Another special case: the tk8.6.9.1 tarball extracts to tk8.6.9.
709707 """
710708 curdir = os .getcwd ()
711709 try :
@@ -715,6 +713,8 @@ def extractArchive(builddir, archiveName):
715713 if ((retval .startswith ('tcl' ) or retval .startswith ('tk' ))
716714 and retval .endswith ('-src' )):
717715 retval = retval [:- 4 ]
716+ if retval == 'tk8.6.9.1' :
717+ retval = 'tk8.6.9'
718718 if os .path .exists (retval ):
719719 shutil .rmtree (retval )
720720 fp = os .popen ("tar zxf %s 2>&1" % (shellQuote (archiveName ),), 'r' )
0 commit comments