Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Handle eventual utf-8 correctly everywhere in download page |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
63565631d7030c87a6cbfbd7c3309368 |
| User & Date: | jan.nijtmans 2012-10-28 08:32:43.244 |
Context
|
2012-10-28
| ||
| 09:00 | a little consistancy: Allow lower and uppercase for all commit responds, so if Caps-Lock hangs that doesn't matter any more. check-in: d503cfd430 user: jan.nijtmans tags: trunk | |
| 08:32 | Handle eventual utf-8 correctly everywhere in download page check-in: 63565631d7 user: jan.nijtmans tags: trunk | |
|
2012-10-27
| ||
| 04:10 | Add <nowiki>[utime] and [stime]</nowiki> commands to TH1. check-in: 3d50bdcb9a user: drh tags: trunk | |
Changes
Changes to www/mkdownload.tcl.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
#!/usr/bin/tclsh
#
# Run this script to build the "download.html" page. Also generate
# the fossil_download_checksums.html page.
#
#
set out [open download.html w]
puts $out \
{<!DOCTYPE html><html>
<head>
<base href="http://www.fossil-scm.org/" />
<title>Fossil: Timeline</title>
<link rel="stylesheet" href="/fossil/style.css" type="text/css"
media="screen">
| > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
#!/usr/bin/tclsh
#
# Run this script to build the "download.html" page. Also generate
# the fossil_download_checksums.html page.
#
#
set out [open download.html w]
fconfigure $out -encoding utf-8 -translation lf
puts $out \
{<!DOCTYPE html><html>
<head>
<base href="http://www.fossil-scm.org/" />
<title>Fossil: Timeline</title>
<link rel="stylesheet" href="/fossil/style.css" type="text/css"
media="screen">
|
| ︙ | ︙ | |||
31 32 33 34 35 36 37 | <a href='/fossil/brlist'>Branches</a> <a href='/fossil/taglist'>Tags</a> <a href='/fossil/reportlist'>Tickets</a> </div> <div class="content"> <p> | | > | > | | 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 |
<a href='/fossil/brlist'>Branches</a>
<a href='/fossil/taglist'>Tags</a>
<a href='/fossil/reportlist'>Tickets</a>
</div>
<div class="content">
<p>
<center><font size=4>}
puts $out \
"<b>To install Fossil \u2192</b> download the stand-alone executable"
puts $out \
{and put it on your $PATH.
</font><p><small>
RPMs available
<a href="http://download.opensuse.org/repositories/home:/rmax:/fossil/">
here.</a>
Cryptographic checksums for download files are
<a href="http://www.hwaci.com/fossil_download_checksums.html">here</a>.
</small></p>
|
| ︙ | ︙ | |||
63 64 65 66 67 68 69 |
#
foreach datetime [lsort -decr [array names adate]] {
set dt [string range $datetime 0 3]-[string range $datetime 4 5]-
append dt "[string range $datetime 6 7] "
append dt "[string range $datetime 8 9]:[string range $datetime 10 11]:"
append dt "[string range $datetime 12 13]"
set link [string map {{ } +} $dt]
| | | 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 |
#
foreach datetime [lsort -decr [array names adate]] {
set dt [string range $datetime 0 3]-[string range $datetime 4 5]-
append dt "[string range $datetime 6 7] "
append dt "[string range $datetime 8 9]:[string range $datetime 10 11]:"
append dt "[string range $datetime 12 13]"
set link [string map {{ } +} $dt]
set hr http://www.fossil-scm.org/fossil/timeline?c=$link&y=ci
puts $out "<tr><td colspan=6 align=left><hr>"
puts $out "<center><b><a href=\"$hr\">$dt</a></b></center>"
puts $out "</td></tr>"
foreach {prefix suffix img desc} {
fossil-linux-x86 zip linux.gif {Linux x86}
fossil-macosx-x86 zip mac.gif {Mac 10.5 x86}
|
| ︙ | ︙ | |||
97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 |
puts $out "<td> </td>"
}
}
puts $out "</tr>"
if {[file exists download/releasenotes-$datetime.html]} {
puts $out "<tr><td colspan=6 align=left>"
set rn [open download/releasenotes-$datetime.html]
puts $out "[read $rn]"
close $rn
puts $out "</td></tr>"
}
}
puts $out "<tr><td colspan=5><hr></td></tr>"
puts $out {</table>
</body>
</html>
}
close $out
# Generate the checksum page
#
set out [open fossil_download_checksums.html w]
puts $out {<html>
<title>Fossil Download Checksums</title>
<body>
<h1 align="center">Checksums For Fossil Downloads</h1>
<p>The following table shows the SHA1 checksums for the precompiled
binaries available on the
<a href="http://www.fossil-scm.org/download.html">Fossil website</a>.</p>
<pre>}
foreach file [lsort [glob -nocomplain download/fossil-*.zip]] {
set sha1sum [lindex [exec sha1sum $file] 0]
puts $out "$sha1sum [file tail $file]"
}
| > > | | 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 |
puts $out "<td> </td>"
}
}
puts $out "</tr>"
if {[file exists download/releasenotes-$datetime.html]} {
puts $out "<tr><td colspan=6 align=left>"
set rn [open download/releasenotes-$datetime.html]
fconfigure $rn -encoding utf-8
puts $out "[read $rn]"
close $rn
puts $out "</td></tr>"
}
}
puts $out "<tr><td colspan=5><hr></td></tr>"
puts $out {</table>
</body>
</html>
}
close $out
# Generate the checksum page
#
set out [open fossil_download_checksums.html w]
fconfigure $out -encoding utf-8 -translation lf
puts $out {<html>
<title>Fossil Download Checksums</title>
<body>
<h1 align="center">Checksums For Fossil Downloads</h1>
<p>The following table shows the SHA1 checksums for the precompiled
binaries available on the
<a href="http://www.fossil-scm.org/download.html">Fossil website</a>.</p>
<pre>}
foreach file [lsort [glob -nocomplain download/fossil-*.zip]] {
set sha1sum [lindex [exec sha1sum $file] 0]
puts $out "$sha1sum [file tail $file]"
}
puts $out {</pre></body></html>}
close $out
|