[email protected] writes:
> Looking at that server.lisp file you mentioned I noticed that Weblocks
> pushes it's dispatcher on the end of the list.
>
> ...
>
> Hmm I noticed that the weblocks-dispatcher function isn't being added
> to the *dispatch-table* list. I tried pushing it manually but it's not
> an exported symbol so I can't do that from outside of Weblocks code.
>
> I noticed that it checks :load-toplevel and I have tried adding ":load-
> toplevel t" to the end of both the start-weblocks and defwebapp calls
> but it seems to make no difference.

This code:

(eval-when (:load-toplevel)
  (push 'weblocks-dispatcher *dispatch-table* ))

means "when this EVAL-WHEN form appears as a top-level form while
loading the containing file, put the symbol WEBLOCKS-DISPATCHER at the
front of the *DISPATCH-TABLE* list".

See http://l1sp.org/cl/eval-when and http://l1sp.org/cl/push for
details.

> When I create a proper Weblocks page I guess maybe that URL will work
> though and if so it's no big deal that the default demo page is not
> accessible.

If you haven't arranged for the existence of an INIT-USER-SESSION
function, then the request handler will always fail.  See the relevant
slot in class `weblocks-webapp'.

-- 
I write stuff at http://failex.blogspot.com/ now.  But the post
formatter and themes are terrible for sharing code, the primary
content, so it might go away sooner or later.

--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"weblocks" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to 
[email protected]
For more options, visit this group at 
http://groups.google.com/group/weblocks?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to