Checklist

Check-in [827e911ff3]
Login

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

Overview
Comment:Database listing in reverse order - newest databases first.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 827e911ff3dfa770771a057441a516a89bd592d6
User & Date: drh 2018-01-29 20:41:21
Context
2018-01-29
22:38
Enable caching of javascript and CSS resources. check-in: d1e8bef86e user: drh tags: trunk
20:41
Database listing in reverse order - newest databases first. check-in: 827e911ff3 user: drh tags: trunk
18:40
Commit transactions from the /sql page. Improvements to the header comment. check-in: ea17699ab0 user: drh tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to checklist.tcl.

28
29
30
31
32
33
34
35
36
37
38
39
40
41
42

# List all available checklists.
#
proc wapp-page-listing {} {
  global wapp DATADIR
  wapp-subst {<h1>Available Checklists</h1>\n}
  wapp-subst {<ol>\n}
  foreach dbfile [lsort [glob -nocomplain $DATADIR/*.db]] {
    set name [file rootname [file tail $dbfile]]
    set url [dict get $wapp BASE_URL]/$name/index
    wapp-subst {<li><a href='%url($url)'>%html($name)</a>\n}
  }
  wapp-subst {</ol>\n}
}








|







28
29
30
31
32
33
34
35
36
37
38
39
40
41
42

# List all available checklists.
#
proc wapp-page-listing {} {
  global wapp DATADIR
  wapp-subst {<h1>Available Checklists</h1>\n}
  wapp-subst {<ol>\n}
  foreach dbfile [lsort -decreasing [glob -nocomplain $DATADIR/*.db]] {
    set name [file rootname [file tail $dbfile]]
    set url [dict get $wapp BASE_URL]/$name/index
    wapp-subst {<li><a href='%url($url)'>%html($name)</a>\n}
  }
  wapp-subst {</ol>\n}
}