17 Aug
2007
17 Aug
'07
3:06 p.m.
On 8/17/07, Ryszard Szopa ryszard.szopa@gmail.com wrote:
(defun with-connection-fun (connection-spec what-to-do) "Functional under the macro WITH-CONNECTION."
Should be: "Function under the macro..."
(let ((postmodern:*database* (apply #'postmodern:connect connection-spec))) (unwind-protect (progn (funcall what-to-do)) (postmodern:disconnect postmodern:*database*))))