# # $Id: messagehandler.icn,v 1.1 2004/02/12 17:07:56 rparlett Exp $ # package mail class MessageHandler : TypeHandler() method can_handle(ct) return (map(ct.get_type()) == "message") & (map(ct.get_subtype()) == "rfc822") end method convert_to_object(m, data) local res res := Message() res.parse(data) | return error(res) return res end method convert_from_object(m, obj) return obj.to_rfc822() end end