summaryrefslogtreecommitdiff
path: root/lisp/service/messages-service.lisp
diff options
context:
space:
mode:
authorckonstanski <kostcarl@isu.edu>2026-03-28 13:59:54 -0600
committerckonstanski <kostcarl@isu.edu>2026-03-28 13:59:54 -0600
commitd3abba68fe367d18a29bd12aa320f4a57a5fe57d (patch)
treef6c7f722d5a10af36b14ba6561bc3f9852fd541b /lisp/service/messages-service.lisp
parent7d523da5d7defbf68a07f746a0d75ea18960267c (diff)
loop..do cleanup
Diffstat (limited to 'lisp/service/messages-service.lisp')
-rw-r--r--lisp/service/messages-service.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/service/messages-service.lisp b/lisp/service/messages-service.lisp
index 18999ab..e03c04c 100644
--- a/lisp/service/messages-service.lisp
+++ b/lisp/service/messages-service.lisp
@@ -38,8 +38,8 @@
(id (get-user))
(string= (session-value :messages-read) "read")))))
(sanitize-rest-json instance)
- (loop for result in (results instance) do
- (sanitize-json result))))
+ (loop for result in (results instance)
+ do (sanitize-json result))))
(defclass messages/mark-service (messages-service)
((location-p :initform nil))