Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Include the meta-viewport element in the header for all pages. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
296b042b2642231da2c91b1f2f30503f |
| User & Date: | drh 2018-08-23 15:21:12 |
Context
|
2019-07-26
| ||
| 13:48 | Convert to be a Fossil CGI extension. Leaf check-in: ebc730eeca user: drh tags: trunk | |
|
2018-08-23
| ||
| 15:21 | Include the meta-viewport element in the header for all pages. check-in: 296b042b26 user: drh tags: trunk | |
|
2018-06-01
| ||
| 02:59 | Fix two minor issues: (1) Clear the prior content from the edit dialog when it pops up in case the AJAX request for content returns nothing. (2) Trim whitespace from both ends of comments before storing in the database. check-in: 9919c0d6f8 user: drh tags: trunk | |
Changes
Changes to checklist.tcl.
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
..
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
wapp-page-listing
}
# List all available checklists.
#
proc wapp-page-listing {} {
global 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 [wapp-param BASE_URL]/$name/index
wapp-subst {<li><a href='%url($url)'>%html($name)</a>\n}
}
wapp-subst {</ol>\n}
}
# Show the CGI environment for testing purposes.
#
proc wapp-page-env {} {
sqlite3 db :memory:
set v [db one {SELECT sqlite_source_id()}]
................................................................................
return 1
}
sqlite3 db $dbfile -create 0
db timeout 1000
db eval BEGIN
set title [db one {SELECT value FROM config WHERE name='title'}]
wapp-trim {
<html>
<head>
<link rel="stylesheet" href="style.css" type="text/css" media="screen">
</head>
<body>
<h1>%html($title)</h1>
}
checklist-verify-login
wapp-subst {<div class="mainmenu">\n}
set this [wapp-param PATH_HEAD]
|
>
>
>
>
>
>
>
>
|
>
|
>
>
|
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
...
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
|
wapp-page-listing
}
# List all available checklists.
#
proc wapp-page-listing {} {
global DATADIR
wapp-trim {
<!DOCTYPE html>
<html>
<head>
<link rel="stylesheet" href="style.css" type="text/css" media="screen">
<meta name="viewport" content="width=device-width, initial-scale=1.0">
</head>
<body>
<h1>Available Checklists</h1>
}
wapp-subst {<ol>\n}
foreach dbfile [lsort -decreasing [glob -nocomplain $DATADIR/*.db]] {
set name [file rootname [file tail $dbfile]]
set url [wapp-param BASE_URL]/$name/index
wapp-subst {<li><a href='%url($url)'>%html($name)</a>\n}
}
wapp-subst {</ol>\n</html>\n}
}
# Show the CGI environment for testing purposes.
#
proc wapp-page-env {} {
sqlite3 db :memory:
set v [db one {SELECT sqlite_source_id()}]
................................................................................
return 1
}
sqlite3 db $dbfile -create 0
db timeout 1000
db eval BEGIN
set title [db one {SELECT value FROM config WHERE name='title'}]
wapp-trim {
<!DOCTYPE html>
<html>
<head>
<link rel="stylesheet" href="style.css" type="text/css" media="screen">
<meta name="viewport" content="width=device-width, initial-scale=1.0">
</head>
<body>
<h1>%html($title)</h1>
}
checklist-verify-login
wapp-subst {<div class="mainmenu">\n}
set this [wapp-param PATH_HEAD]
|