[isidorus-cvs] r714 - trunk/src/rest_interface

Author: lgiessmann Date: Fri Aug 5 04:02:12 2011 New Revision: 714 Log: trunk: rest-interface: changed the serialization-handler of json-fragments Modified: trunk/src/rest_interface/set-up-json-interface.lisp Modified: trunk/src/rest_interface/set-up-json-interface.lisp ============================================================================== --- trunk/src/rest_interface/set-up-json-interface.lisp Fri Aug 5 00:51:26 2011 (r713) +++ trunk/src/rest_interface/set-up-json-interface.lisp Fri Aug 5 04:02:12 2011 (r714) @@ -340,8 +340,9 @@ (let ((fragment (get-latest-fragment-of-topic identifier))) (if (and fragment (find-item-by-revision (topic fragment) 0)) (handler-case - (export-construct-as-isidorus-json-string - fragment :revision 0) + (d:serialize-fragment fragment (fragment-serializer)) + ;(export-construct-as-isidorus-json-string + ;fragment :revision 0) (condition (err) (progn (setf (hunchentoot:return-code*)
participants (1)
-
lgiessmann@common-lisp.net