Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Moved build script, and fixed various things |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
2889e59a6044030753dc123211f63f55 |
| User & Date: | aku 2016-11-21 00:04:43 |
Context
|
2016-11-21
| ||
| 00:08 | Fix favicon. check-in: d4229c4cab user: aku tags: trunk | |
| 00:04 | Moved build script, and fixed various things check-in: 2889e59a60 user: aku tags: trunk | |
|
2016-11-20
| ||
| 23:46 | Restructured, added build tool. check-in: c96c27cbfc user: aku tags: trunk | |
Changes
Name change from tools/rebuild to build.tcl.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 |
#!/usr/bin/env tclsh # -*- tcl -*- package require Tcl 8.5 # argv0 : /.../website/tools/rebuild # tools : /.../website/tools # top : /.../ proc norm {path} { return [file dirname [file normalize $path/___]] } proc clear {} { exec >@ stdout 2>@ stderr clear } proc echo {args} { puts $args } set tools [file dirname [norm $argv0]] set top [file dirname [file dirname $tools]] set log [file join $top rebuild.log] cd $top clear echo echo website cleanup input exec find website -name {*~} -exec rm {{}} \; echo ...done echo website cleanup output exec >@ stdout 2>@ stderr ssg clean echo ...done clear echo echo website build exec ssg build "[email protected]" 2>&1 | tee $log >@ stdout 2>@ stderr echo ...done exit |
| < | | < | < < | > > > > |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 |
#!/usr/bin/env tclsh # -*- tcl -*- package require Tcl 8.5 # argv0 : /home/www/src/website/build.tcl # top : /home/www/src/ proc norm {path} { return [file dirname [file normalize $path/___]] } proc clear {} { exec >@ stdout 2>@ stderr clear } proc echo {args} { puts $args } set top [file dirname [file dirname [norm $argv0]]] set log [file join $top rebuild.log] cd $top clear echo echo website cleanup input exec find website -name {*~} -exec rm {{}} \; echo ...done echo website cleanup output exec >@ stdout 2>@ stderr ssg clean echo ...done echo website build exec ssg build website/input website/output "[email protected]" | tee $log >@ stdout 2>@ stderr echo ...done echo website sync over exec >@ stdout 2>@ stderr rsync -avx website/output/ ../core_tcl_tk.website/ echo ...done exit |