From d1258d3a174b2eebfd76037b3459b124df0b8ec7 Mon Sep 17 00:00:00 2001 From: Kim Alvefur Date: Sat, 1 Sep 2018 23:45:58 +0200 Subject: mod_vcard_legacy: Add translation of email field --- plugins/mod_vcard_legacy.lua | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'plugins') diff --git a/plugins/mod_vcard_legacy.lua b/plugins/mod_vcard_legacy.lua index 7bc09638..81d35309 100644 --- a/plugins/mod_vcard_legacy.lua +++ b/plugins/mod_vcard_legacy.lua @@ -46,6 +46,19 @@ module:hook("iq-get/bare/vcard-temp:vCard", function (event) if text then vcard_temp:text_tag(tag.name:upper(), text); end + elseif tag.name == "email" then + local text = tag:get_child_text("text"); + if text then + vcard_temp:tag("EMAIL") + :text_tag("USERID", text) + :tag("INTERNET"):up(); + if tag:find"parameters/type/text#" == "home" then + vcard_temp:tag("HOME"):up(); + elseif tag:find"parameters/type/text#" == "work" then + vcard_temp:tag("WORK"):up(); + end + vcard_temp:up(); + end end end end -- cgit v1.2.3