got contact info working

1 files changed, 28 insertions, 1 deletions

diff --git a/lisp/webapps/resume/site.lisp b/lisp/webapps/resume/site.lisp
index 80bdbe1..2142c9c 100644
--- a/lisp/webapps/resume/site.lisp
+++ b/lisp/webapps/resume/site.lisp
@@ -152,6 +152,27 @@
 (defmacro .resumes-delete ()
   `(resumes-delete-json id))
 
+(defmacro .contactinfo ()
+  `(contactinfo-json))
+
+(defmacro .contactinfo-view ()
+  `(contactinfo-view-json))
+
+(defmacro .contactinfo-add ()
+  `(contactinfo-add-json))
+
+(defmacro .contactinfo-add-submit ()
+  `(contactinfo-add-submit-json address city state_id phone email visastatus_id))
+
+(defmacro .contactinfo-modify ()
+  `(contactinfo-modify-json id))
+
+(defmacro .contactinfo-modify-submit ()
+  `(contactinfo-modify-submit-json id address city state_id phone email visastatus_id))
+
+(defmacro .contactinfo-delete ()
+  `(contactinfo-delete-json id))
+
 (define-endpoint ("/" :method :get) () .base)
 (define-endpoint ("/location" :method :post) (&post (location :parameter-type 'string)) .location)
 (define-endpoint ("/home" :method :get) () .home-get)
@@ -189,7 +210,6 @@
 (define-endpoint ("/users/modify/submit" :method :post) (&post (id :parameter-type 'integer) (role_groups :parameter-type 'string) (username :parameter-type 'string) (first_name :parameter-type 'string) (last_name :parameter-type 'string) (email :parameter-type 'string) (phone :parameter-type 'string)) .users-modify-submit)
 (define-endpoint ("/users/toggle-active" :method :post) (&post (id :parameter-type 'integer)) .users-toggle-active)
 (define-endpoint ("/users/delete/:id" :method :delete) (&path (id 'integer)) .users-delete)
-
 (define-endpoint ("/resumes" :method :get) () .resumes)
 (define-endpoint ("/resumes/view" :method :get) () .resumes-view)
 (define-endpoint ("/resumes/add" :method :post) () .resumes-add)
@@ -197,3 +217,10 @@
 (define-endpoint ("/resumes/modify" :method :post) (&post (id :parameter-type 'integer)) .resumes-modify)
 (define-endpoint ("/resumes/modify/submit" :method :post) (&post (id :parameter-type 'integer) (name :parameter-type 'string)) .resumes-modify-submit)
 (define-endpoint ("/resumes/delete/:id" :method :delete) (&path (id 'integer)) .resumes-delete)
+(define-endpoint ("/resumes/contactinfo" :method :get) () .contactinfo)
+(define-endpoint ("/resumes/contactinfo/view" :method :get) () .contactinfo-view)
+(define-endpoint ("/resumes/contactinfo/add" :method :post) () .contactinfo-add)
+(define-endpoint ("/resumes/contactinfo/add/submit" :method :post) (&post (address :parameter-type 'string) (city :parameter-type 'string) (state_id :parameter-type 'integer) (phone :parameter-type 'string) (email :parameter-type 'string) (visastatus_id :parameter-type 'integer)) .contactinfo-add-submit)
+(define-endpoint ("/resumes/contactinfo/modify" :method :post) (&post (id :parameter-type 'integer)) .contactinfo-modify)
+(define-endpoint ("/resumes/contactinfo/modify/submit" :method :post) (&post (id :parameter-type 'integer) (address :parameter-type 'string) (city :parameter-type 'string) (state_id :parameter-type 'integer) (phone :parameter-type 'string) (email :parameter-type 'string) (visastatus_id :parameter-type 'integer)) .contactinfo-modify-submit)
+(define-endpoint ("/resumes/contactinfo/delete/:id" :method :delete) (&path (id 'integer)) .contactinfo-delete)