Documentation Source Text

Check-in [a5c38ef1bf]
Login

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

Overview
Comment:Add the CGI-Environment and Source-code submenu links to the checklist application.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: a5c38ef1bfbdef2c250e8361315d81bac70da1d3bce36334ac4e3c94ae5d5aa5
User & Date: drh 2019-07-27 15:39:20.666
Context
2019-07-27
16:09
Improvements to the header comment on the checklist application, bringing it up-to-date with the actual implementation. Added a prototype checklist database file. (check-in: e8d378f753 user: drh tags: trunk)
15:39
Add the CGI-Environment and Source-code submenu links to the checklist application. (check-in: a5c38ef1bf user: drh tags: trunk)
15:28
In the checklist application, add a /self method and make the magic database name "top" refer to the lexically largest database file. (check-in: 752d433361 user: drh tags: trunk)
Changes
Side-by-Side Diff Ignore Whitespace Patch
Changes to misc/checklist.tcl.
︙
149
150
151
152
153
154
155
156

157
158
159
160
161

162
163
164

165


166
167
168

169
170
171
172
173
174
175

149
150
151
152
153
154
155

156
157
158
159
160

161
162
163

164
165
166
167
168
169

170
171
172
173
174
175
176
177








-
+




-
+


-
+

+
+


-
+








    </style>
  }
  checklist-verify-login
  wapp-subst {<div class="submenu">\n}
  set base [wapp-param BASE]
  set this [wapp-param PATH_HEAD]
  if {$this!="index"} {
    wapp-subst {<a href='%html($base/index)'>checklist</a>\n}
    wapp-subst {<a href='%html($base/index)'>Checklist</a>\n}
  }
  set admin [wapp-param CKLIST_ADMIN 0]
  if {$admin} {
    if {$this!="sql"} {
      wapp-subst {<a href='%html($base/sql)'>sql</a>\n}
      wapp-subst {<a href='%html($base/sql)'>SQL</a>\n}
    }
    if {$this!="cklistedit"} {
      wapp-subst {<a href='%html($base/cklistedit)'>edit-checklist</a>\n}
      wapp-subst {<a href='%html($base/cklistedit)'>Edit-checklist</a>\n}
    }
    wapp-subst {<a href='%html($base/env)'>CGI-environment</a>}
    wapp-subst {<a href='%html($base/self)'>Source-code</a>}
  }
  set dir [wapp-param ROOT_URL]
  wapp-subst {<a href='%html($dir/listing)'>catalog</a>\n}
  wapp-subst {<a href='%html($dir/listing)'>Catalog</a>\n}
  wapp-subst {</div>\n}
  return 0
}

# Close out a web page.  Close the database connection that was opened
# by checklist-common-header.
#
︙