Fossil

Check-in [4b2ab22c]
Login

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

Overview
Comment:Update the script used to build the "download.html" page so that it can accommodate longer timestamps.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:4b2ab22c2a9af62b19b831b1614c05e4dbcccb5e
User & Date: drh 2011-01-13 00:54:14
References
2011-01-13
12:26 New ticket [9bd235c6] ignore-glob does not work for addremove. artifact: 147bb6b1 user: anonymous
Context
2011-01-13
19:45
Declare all variables before any code, in the register_page() function. Ticket [59a156204ae6419d] check-in: 372c7257 user: drh tags: trunk
00:54
Update the script used to build the "download.html" page so that it can accommodate longer timestamps. check-in: 4b2ab22c user: drh tags: trunk
00:01
Add tests for the file_simplify_name utility function. check-in: 6f42e76d user: drh tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to www/mkdownload.tcl.

32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
<table cellpadding="10">
}

# Find all all unique timestamps.
#
foreach file [glob -nocomplain download/fossil-*.zip] {
  if {[regexp {(\d+).zip$} $file all datetime]
       && [string length $datetime]==14} {
    set adate($datetime) 1
  }
}

# Do all dates from newest to oldest
#
foreach datetime [lsort -decr [array names adate]] {







|







32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
<table cellpadding="10">
}

# Find all all unique timestamps.
#
foreach file [glob -nocomplain download/fossil-*.zip] {
  if {[regexp {(\d+).zip$} $file all datetime]
       && [string length $datetime]>=14} {
    set adate($datetime) 1
  }
}

# Do all dates from newest to oldest
#
foreach datetime [lsort -decr [array names adate]] {