Check-in [1ee3190643]
Overview
Comment:Switched to force to binary download of packages
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 1ee3190643c67f36b93e7fa1c1a548d770fde571
User & Date: rkeene on 2010-02-05 05:38:31
Other Links: manifest | tags
Context
2010-02-05
05:39
Teaparty 0.9.4 check-in: 646eeec6a7 user: rkeene tags: trunk
05:38
Switched to force to binary download of packages check-in: 1ee3190643 user: rkeene tags: trunk
05:14
Updated example to use single server check-in: 698e02690e user: rkeene tags: trunk
Changes

Modified client/lib/teapotclient0.1/teapotclient.tcl from [03a62da1de] to [a5bf42fefe].

121
122
123
124
125
126
127


128

129
130
131
132
133
134
135
121
122
123
124
125
126
127
128
129

130
131
132
133
134
135
136
137







+
+
-
+







			file mkdir $pkgdir $::teapotclient::pkgcachedir

			set url "http://$server/package/name/$extension/ver/$ver/arch/$arch/file"
			set urlcachefile [file join $::teapotclient::pkgcachedir [::md5::md5 -hex $url]]

			if {![file exists $urlcachefile]} {
				set tmpfd [open $urlcachefile w]
				fconfigure $tmpfd -encoding binary -translation binary -buffering none

				set token [::http::geturl $url -channel $tmpfd]
				set token [::http::geturl $url -binary true -channel $tmpfd]

				::http::cleanup $token
				close $tmpfd
			}

			set retarr($extension) [list $ver $arch $server]
			switch -regexp -- [::fileutil::fileType $urlcachefile] {