@@ -227,9 +227,9 @@ def library_recipes():
227227 if internalTk ():
228228 result .extend ([
229229 dict (
230- name = "Tcl 8.6.8 " ,
231- url = "ftp://ftp.tcl.tk/pub/tcl//tcl8_6/tcl8.6.8 -src.tar.gz" ,
232- checksum = '81656d3367af032e0ae6157eff134f89 ' ,
230+ name = "Tcl 8.6.9 " ,
231+ url = "ftp://ftp.tcl.tk/pub/tcl//tcl8_6/tcl8.6.9 -src.tar.gz" ,
232+ checksum = 'aa0a121d95a0e7b73a036f26028538d4 ' ,
233233 buildDir = "unix" ,
234234 configure_pre = [
235235 '--enable-shared' ,
@@ -243,12 +243,9 @@ def library_recipes():
243243 },
244244 ),
245245 dict (
246- name = "Tk 8.6.8" ,
247- url = "ftp://ftp.tcl.tk/pub/tcl//tcl8_6/tk8.6.8-src.tar.gz" ,
248- checksum = '5e0faecba458ee1386078fb228d008ba' ,
249- patches = [
250- "tk868_on_10_8_10_9.patch" ,
251- ],
246+ name = "Tk 8.6.9.1" ,
247+ url = "ftp://ftp.tcl.tk/pub/tcl//tcl8_6/tk8.6.9.1-src.tar.gz" ,
248+ checksum = '9efe3976468352dc894dae0c4e785a8e' ,
252249 buildDir = "unix" ,
253250 configure_pre = [
254251 '--enable-aqua' ,
@@ -709,6 +706,7 @@ def extractArchive(builddir, archiveName):
709706 work for current Tcl and Tk source releases where the basename of
710707 the archive ends with "-src" but the uncompressed directory does not.
711708 For now, just special case Tcl and Tk tar.gz downloads.
709+ Another special case: the tk8.6.9.1 tarball extracts to tk8.6.9.
712710 """
713711 curdir = os .getcwd ()
714712 try :
@@ -718,6 +716,8 @@ def extractArchive(builddir, archiveName):
718716 if ((retval .startswith ('tcl' ) or retval .startswith ('tk' ))
719717 and retval .endswith ('-src' )):
720718 retval = retval [:- 4 ]
719+ if retval == 'tk8.6.9.1' :
720+ retval = 'tk8.6.9'
721721 if os .path .exists (retval ):
722722 shutil .rmtree (retval )
723723 fp = os .popen ("tar zxf %s 2>&1" % (shellQuote (archiveName ),), 'r' )
0 commit comments