Overview
Comment: | Updated to not rebuild zip files unless requested |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: | 552b62761a54ce91f6285eeb2c0dad0ed7a55350 |
User & Date: | rkeene on 2010-02-05 06:16:50 |
Other Links: | manifest | tags |
Context
2010-02-05
| ||
06:26 | Changed my repository lower priority check-in: 4fbd51bc1d user: rkeene tags: trunk | |
06:16 | Updated to not rebuild zip files unless requested check-in: 552b62761a user: rkeene tags: trunk | |
06:15 | Updated to exclude build log from packages Updated to rebuild zip files, even if they already exist check-in: b494891f05 user: rkeene tags: trunk | |
Changes
Modified server/teapot_index from [6548de250e] to [3523082fbc].
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
...
207
208
209
210
211
212
213
214
215
216
217
218
219
220
|
close $fd
file delete $altindexfile
file link -hard $altindexfile $indexfile
}
# Create "package/name/<pkg>/ver/<ver>/arch/<arch>/file"
proc create_output_files {dstdir pkginfo_arrlist} {
array set pkginfo $pkginfo_arrlist
foreach ent [array names pkginfo] {
set pkg [lindex $ent 0]
set ver [lindex $ent 1]
set arch [lindex $ent 2]
................................................................................
set regfile [file join $workdir file]
set extfile [file join $workdir $extfiletail]
catch {
file mkdir $workdir
}
if {$multifile} {
if {[catch {
cd $pkgdir
file delete $extfile
exec zip -r $extfile . -x build.log
} err]} {
puts "Error while zipping: $err"
|
|
>
>
>
>
|
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
...
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
|
close $fd file delete $altindexfile file link -hard $altindexfile $indexfile } # Create "package/name/<pkg>/ver/<ver>/arch/<arch>/file" proc create_output_files {dstdir pkginfo_arrlist {force 0}} { array set pkginfo $pkginfo_arrlist foreach ent [array names pkginfo] { set pkg [lindex $ent 0] set ver [lindex $ent 1] set arch [lindex $ent 2] ................................................................................ set regfile [file join $workdir file] set extfile [file join $workdir $extfiletail] catch { file mkdir $workdir } if {$multifile} { if {[file exists $extfile] && !$force} { continue } if {[catch { cd $pkgdir file delete $extfile exec zip -r $extfile . -x build.log } err]} { puts "Error while zipping: $err" |