Wapp

Check-in [b46ad175c5]
Login

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

Overview
Comment:Do not allow the content-length to be zero in a redirect. Put in some content, even if it is not used.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: b46ad175c53a562a0437fe25e1c4140bf50991a3aaf811122826fc97f7238365
User & Date: drh 2025-04-09 16:15:27.026
Context
2025-05-07
14:00
Update the built-in SQLite to the latest 3.50.0 beta. Enhancements to the Makefile: add the "env" target. Remove obsolete and/or pointless options. (check-in: f56694fabb user: drh tags: trunk)
2025-04-09
16:15
Do not allow the content-length to be zero in a redirect. Put in some content, even if it is not used. (check-in: b46ad175c5 user: drh tags: trunk)
2025-04-04
14:55
Enhance the wapp-redirect command so that you can add an optional result code value (ex: 301) to override the default HTTP reply code of 303. (check-in: 98bf94e32b user: drh tags: trunk)
Changes
Unified Diff Ignore Whitespace Patch
Changes to wapp.tcl.
243
244
245
246
247
248
249

250
251
252
253
254
255
256
  wapp-reply-extra Cache-Control $x
}

# Redirect to a different web page
#
proc wapp-redirect {uri {code {303 Redirect}}} {
  wapp-reset

  wapp-reply-code $code
  wapp-reply-extra Location $uri
}

# Return the value of a wapp parameter
#
proc wapp-param {name {dflt {}}} {







>







243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
  wapp-reply-extra Cache-Control $x
}

# Redirect to a different web page
#
proc wapp-redirect {uri {code {303 Redirect}}} {
  wapp-reset
  wapp-trim {Redirect to %html($uri)}
  wapp-reply-code $code
  wapp-reply-extra Location $uri
}

# Return the value of a wapp parameter
#
proc wapp-param {name {dflt {}}} {