Stephen Compall <[email protected]> writes: > On Jan 10, 2:13 pm, Jan Rychter <[email protected]> wrote: >> Would you be willing to provide an example of such an :around method? > > Something like > > (defmethod handle-client-request :around ((app my-app)) > (let ((clsql:*default-database* *my-app-store*)) > (call-next-method))) > >> I'm sorry, but I've been trying to understand just how to get from a >> *default-store* which is an instance of fluid-database to working select >> statements (e.g. *default-database*) > > The fluid-database is a CLSQL database and supports the full CLSQL > API. The above is all you need to do select calls with the implied > database argument.
Thanks, I didn't realize it was that simple. It seems to work well so far, no problems encountered yet, and the corruption I was seeing seems to be gone. But, it's too early to tell. I would like to stress-test the app, but ab won't follow redirects, and weblocks insists on the following sequence: [22:53] tnuctip:/tmp>wget http://localhost:8080/ --2009-01-11 22:53:42-- http://localhost:8080/ Resolving localhost... 127.0.0.1, ::1 Connecting to localhost|127.0.0.1|:8080... connected. HTTP request sent, awaiting response... 302 Moved Temporarily Location: http://localhost:8080/?weblocks-g1295=7200%3A81B0BBBE07A6F69F284A01DB31BD6F81 [following] --2009-01-11 22:53:42-- http://localhost:8080/?weblocks-g1295=7200%3A81B0BBBE07A6F69F284A01DB31BD6F81 Connecting to localhost|127.0.0.1|:8080... connected. HTTP request sent, awaiting response... 302 Moved Temporarily Location: http://localhost:8080/ [following] --2009-01-11 22:53:42-- http://localhost:8080/ Connecting to localhost|127.0.0.1|:8080... connected. HTTP request sent, awaiting response... 200 OK Length: 14573 (14K) [text/html] Saving to: `index.html' 100%[================================================================================>] 14,573 --.-K/s in 0s 2009-01-11 22:53:42 (366 MB/s) - `index.html' saved [14573/14573] [22:53] tnuctip:/tmp> ... which I think is rather strange and merits looking into on its own. Many thanks for your work on clsql-fluid! --J. --~--~---------~--~----~------------~-------~--~----~ 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 -~----------~----~----~----~------~----~------~--~---
