summaryrefslogtreecommitdiff
path: root/lisp/service/rest-service.lisp
diff options
context:
space:
mode:
authorckonstanski <kostcarl@isu.edu>2026-08-18 20:00:23 -0600
committerckonstanski <kostcarl@isu.edu>2026-08-18 20:00:23 -0600
commit26a106b0d9687be8448e37658887c8bc2937804e (patch)
treec13e2b04583802f7e3c407dc9a7c9f945cc15bfb /lisp/service/rest-service.lisp
parentc3b8f1326a874ae08b394020c6279237b0413293 (diff)
notification cleanup and message marking
Diffstat (limited to 'lisp/service/rest-service.lisp')
-rw-r--r--lisp/service/rest-service.lisp6
1 files changed, 0 insertions, 6 deletions
diff --git a/lisp/service/rest-service.lisp b/lisp/service/rest-service.lisp
index 4d23031..f497245 100644
--- a/lisp/service/rest-service.lisp
+++ b/lisp/service/rest-service.lisp
@@ -20,12 +20,6 @@
(defmethod initialize-instance :after ((rest-service rest-service) &key)
(when (location-p rest-service)
- (if (message rest-service)
- (setf (session-value :message) (message rest-service))
- (setf (message rest-service) (session-value :message)))
- (if (errormsg rest-service)
- (setf (session-value :errormsg) (errormsg rest-service))
- (setf (errormsg rest-service) (session-value :errormsg)))
(when (null (location rest-service))
(setf (location rest-service) (type-to-path rest-service)))))