stuff

1 files changed, 3 insertions, 9 deletions

diff --git a/lisp/service/profile-service.lisp b/lisp/service/profile-service.lisp
index 990a9d0..de31d29 100644
--- a/lisp/service/profile-service.lisp
+++ b/lisp/service/profile-service.lisp
@@ -16,10 +16,11 @@
    (location-p :initform nil))
   (:documentation ""))
 
-(defclass profile/modify-service (profile/view-service)
+(defclass profile/modify-service (profile-service)
   ((form :initarg :form
          :initform nil
-         :accessor form))
+         :accessor form)
+   (location-p :initform nil))
   (:documentation ""))
 
 (defun profile-json ()
@@ -34,13 +35,6 @@
     (loop for item in (items instance)
           do (sanitize-json item))))
 
-(defclass profile/modify-service (profile-service)
-  ((form :initarg :form
-         :initform nil
-         :accessor form)
-   (location-p :initform nil))
-  (:documentation ""))
-
 (defun profile-modify-json ()
   (with-auth (instance profile/modify-service "profile-modify")
     (let ((user (get-user)))