Fossil SCM
New download.html generator script that allows for release notes to be inserted with each build.
Commit
3c657e8e0ca52108f143e25d195f77705b8a3444
Parent
a22a66634903bf1…
1 file changed
+7
-2
+7
-2
| --- www/mkdownload.tcl | ||
| +++ www/mkdownload.tcl | ||
| @@ -48,12 +48,17 @@ | ||
| 48 | 48 | append dt "[string range $datetime 6 7] " |
| 49 | 49 | append dt "[string range $datetime 8 9]:[string range $datetime 10 11]:" |
| 50 | 50 | append dt "[string range $datetime 12 13]" |
| 51 | 51 | set link [string map {{ } +} $dt] |
| 52 | 52 | set hr http://www.fossil-scm.org/fossil/timeline?c=$link&y=ci |
| 53 | - puts "<tr><td colspan=5 align=center><hr>" | |
| 54 | - puts "<b>Fossil snapshot as of <a href=\"$hr\">$dt</a><td width=30></b>" | |
| 53 | + puts "<tr><td colspan=6 align=left><hr>" | |
| 54 | + puts "<center><b><a href=\"$hr\">$dt</a></b></center>" | |
| 55 | + if {[file exists download/releasenotes-$datetime.html]} { | |
| 56 | + set rn [open download/releasenotes-$datetime.html] | |
| 57 | + puts "[read $rn]" | |
| 58 | + close $rn | |
| 59 | + } | |
| 55 | 60 | puts "</td></tr>" |
| 56 | 61 | |
| 57 | 62 | foreach {prefix suffix img desc} { |
| 58 | 63 | fossil-linux-x86 zip linux.gif {Linux x86} |
| 59 | 64 | fossil-linux-amd64 zip linux64.gif {Linux x86_64} |
| 60 | 65 |
| --- www/mkdownload.tcl | |
| +++ www/mkdownload.tcl | |
| @@ -48,12 +48,17 @@ | |
| 48 | append dt "[string range $datetime 6 7] " |
| 49 | append dt "[string range $datetime 8 9]:[string range $datetime 10 11]:" |
| 50 | append dt "[string range $datetime 12 13]" |
| 51 | set link [string map {{ } +} $dt] |
| 52 | set hr http://www.fossil-scm.org/fossil/timeline?c=$link&y=ci |
| 53 | puts "<tr><td colspan=5 align=center><hr>" |
| 54 | puts "<b>Fossil snapshot as of <a href=\"$hr\">$dt</a><td width=30></b>" |
| 55 | puts "</td></tr>" |
| 56 | |
| 57 | foreach {prefix suffix img desc} { |
| 58 | fossil-linux-x86 zip linux.gif {Linux x86} |
| 59 | fossil-linux-amd64 zip linux64.gif {Linux x86_64} |
| 60 |
| --- www/mkdownload.tcl | |
| +++ www/mkdownload.tcl | |
| @@ -48,12 +48,17 @@ | |
| 48 | append dt "[string range $datetime 6 7] " |
| 49 | append dt "[string range $datetime 8 9]:[string range $datetime 10 11]:" |
| 50 | append dt "[string range $datetime 12 13]" |
| 51 | set link [string map {{ } +} $dt] |
| 52 | set hr http://www.fossil-scm.org/fossil/timeline?c=$link&y=ci |
| 53 | puts "<tr><td colspan=6 align=left><hr>" |
| 54 | puts "<center><b><a href=\"$hr\">$dt</a></b></center>" |
| 55 | if {[file exists download/releasenotes-$datetime.html]} { |
| 56 | set rn [open download/releasenotes-$datetime.html] |
| 57 | puts "[read $rn]" |
| 58 | close $rn |
| 59 | } |
| 60 | puts "</td></tr>" |
| 61 | |
| 62 | foreach {prefix suffix img desc} { |
| 63 | fossil-linux-x86 zip linux.gif {Linux x86} |
| 64 | fossil-linux-amd64 zip linux64.gif {Linux x86_64} |
| 65 |