diff options
| author | ckonstanski <kostcarl@isu.edu> | 2026-08-18 20:00:23 -0600 |
|---|---|---|
| committer | ckonstanski <kostcarl@isu.edu> | 2026-08-18 20:00:23 -0600 |
| commit | 26a106b0d9687be8448e37658887c8bc2937804e (patch) | |
| tree | c13e2b04583802f7e3c407dc9a7c9f945cc15bfb /lisp/sql/contact-pkg.lisp | |
| parent | c3b8f1326a874ae08b394020c6279237b0413293 (diff) | |
notification cleanup and message marking
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')" |