[hunchentoot-devel] script-name*
Hans Hübner
hans at huebner.org
Wed Jun 25 07:43:06 UTC 2008
Fixed, thanks.
Hans
On Tue, Jun 24, 2008 at 11:24 PM, Cyrus Harmon <ch-tbnl at bobobeach.com> wrote:
> Well, it looks like Hans found the same problem I found with script-name,
> but, and this is a very minor stylistic point, since we already have the
> request here, why don't we just call (script-name request) instead of
> (script-name*)?
>
> thanks,
>
> Cyrus
>
>
> Index: headers.lisp
> ===================================================================
> --- headers.lisp (revision 3320)
> +++ headers.lisp (working copy)
> @@ -162,10 +162,10 @@
> "The server could not verify that you are
> authorized to access the document requested. Either you supplied the wrong
> credentials \(e.g., bad password), or your browser doesn't understand how to
> supply the credentials required.")
> ((#.+http-forbidden+)
> (format nil "You don't have permission to access
> ~A on this server."
> - (script-name*)))
> + (script-name request)))
> ((#.+http-not-found+)
> (format nil "The requested URL ~A was not found
> on this server."
> - (script-name*)))
> + (script-name request)))
> ((#.+http-bad-request+)
> "Your browser sent a request that this server
> could not understand.")
> (otherwise ""))
>
>
> instead of_______________________________________________
> tbnl-devel site list
> tbnl-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/tbnl-devel
>
More information about the Tbnl-devel
mailing list