diff options
Diffstat (limited to 'lisp/sql/contact-pkg.lisp')
| -rw-r--r-- | lisp/sql/contact-pkg.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/sql/contact-pkg.lisp b/lisp/sql/contact-pkg.lisp index dce6384..207708c 100644 --- a/lisp/sql/contact-pkg.lisp +++ b/lisp/sql/contact-pkg.lisp @@ -23,6 +23,7 @@ (caar (call-pg-function contact-pkg contact-us-post))) (defmethod mark-contact-us-post ((contact-pkg contact-pkg) contact-us-post-id user-id read-p) + (let ((contact-us-post (make-instance 'contact-us-post :*table (format nil "contact.mark_contact_us_post(~a, ~a, '~a')" |