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*)