Documentation Source Text

Check-in [defefcd9eb]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fix a bug on the download.in page.
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: defefcd9ebcfc0928375afe0744ee14752bdddc6
User & Date: drh 2007-11-14 01:01:22
Context
2007-11-14
02:46
Various page tweaks. Added the amalgamation.in page. Clicking on the SQLite logo now takes you to the homepage. check-in: ee2dd30d18 user: drh tags: trunk
01:01
Fix a bug on the download.in page. check-in: defefcd9eb user: drh tags: trunk
2007-11-13
20:53
Add the onefile.html page and a link from the about.html page. check-in: 61a0a369be user: drh tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to pages/download.in.

1
2
3
4
5
6
7
8
9
10
..
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
<title>SQLite Download Page</title>

<h2>SQLite Download Page</h1>
<table width="100%" cellpadding="5">

<tcl>
proc Product {pattern desc} {
  regsub {V[23]} $pattern {*} p3
  regsub V2 $pattern {(2[0-9a-z._]+)} pattern
  regsub V3 $pattern {(3[0-9a-z._]+)} pattern
................................................................................
      set units MiB
    } elseif {$size>1024} {
      set size [format %.2f [expr {$size/(1024.0)}]]
      set units KiB
    }
    global pending_heading
    if {$pending_heading!=""} {
      puts "<tr><td colspan=\"4\"><h3>$pending_heading</h3></td></tr>"
      set pending_heading {}
    }
    puts "<tr><td width=\"10\"></td>"
    puts "<td valign=\"top\" align=\"right\">"
    puts "<a href=\"$file\">$file</a><br>($size $units)</td>"
    puts "<td width=\"5\"></td>"
    regsub -all VERSION $desc $version d2


|







 







|







1
2
3
4
5
6
7
8
9
10
..
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
<title>SQLite Download Page</title>

<h2>SQLite Download Page</h2>
<table width="100%" cellpadding="5">

<tcl>
proc Product {pattern desc} {
  regsub {V[23]} $pattern {*} p3
  regsub V2 $pattern {(2[0-9a-z._]+)} pattern
  regsub V3 $pattern {(3[0-9a-z._]+)} pattern
................................................................................
      set units MiB
    } elseif {$size>1024} {
      set size [format %.2f [expr {$size/(1024.0)}]]
      set units KiB
    }
    global pending_heading
    if {$pending_heading!=""} {
      puts "<tr><td colspan=\"4\"><b>$pending_heading</b></td></tr>"
      set pending_heading {}
    }
    puts "<tr><td width=\"10\"></td>"
    puts "<td valign=\"top\" align=\"right\">"
    puts "<a href=\"$file\">$file</a><br>($size $units)</td>"
    puts "<td width=\"5\"></td>"
    regsub -all VERSION $desc $version d2