diff options
Diffstat (limited to 'lisp/sql/resume-pkg.lisp')
| -rw-r--r-- | lisp/sql/resume-pkg.lisp | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/lisp/sql/resume-pkg.lisp b/lisp/sql/resume-pkg.lisp index a0fc3d2..e44dfd4 100644 --- a/lisp/sql/resume-pkg.lisp +++ b/lisp/sql/resume-pkg.lisp @@ -13,9 +13,6 @@ (let ((resume (make-instance 'resume :user_id (id user)))) (get-records resume-pkg resume "name asc"))) -(defmethod get-resume ((resume-pkg resume-pkg) (resume resume)) - (get-record resume-pkg resume)) - (defmethod insert-resume ((resume-pkg resume-pkg) (resume resume)) (setf (*table resume) (format nil "resume.insert_resume(~a, '~a')" @@ -38,9 +35,6 @@ (let ((contactinfo-v (make-instance 'contactinfo-v :user_id (id user)))) (get-records resume-pkg contactinfo-v "state_name asc, city asc, address asc, email asc, phone asc, visastatus asc"))) -(defmethod get-contactinfo ((resume-pkg resume-pkg) (contactinfo-v contactinfo-v)) - (get-record resume-pkg contactinfo-v)) - (defmethod insert-contactinfo ((resume-pkg resume-pkg) (contactinfo contactinfo)) (setf (*table contactinfo) (format nil "resume.insert_contactinfo(~a, ~a, ~a, '~a', '~a', '~a', '~a')" |