MUC: Add support for setting a room language (closes #1149)

1 files changed, 50 insertions, 0 deletions

diff --git a/plugins/muc/language.lib.lua b/plugins/muc/language.lib.lua
new file mode 100644
index 00000000..ae9bcfed
--- /dev/null
+++ b/plugins/muc/language.lib.lua
@@ -0,0 +1,50 @@
+-- Prosody IM
+-- Copyright (C) 2008-2010 Matthew Wild
+-- Copyright (C) 2008-2010 Waqas Hussain
+-- Copyright (C) 2014 Daurnimator
+--
+-- This project is MIT/X11 licensed. Please see the
+-- COPYING file in the source package for more information.
+--
+
+local function get_language(room)
+	return room._data.language;
+end
+
+local function set_language(room, language)
+	if language == "" then language = nil; end
+	if get_language(room) == language then return false; end
+	room._data.language = language;
+	return true;
+end
+
+local function add_disco_form(event)
+	table.insert(event.form, {
+		name = "muc#roominfo_lang";
+		value = "";
+	});
+	event.formdata["muc#roominfo_lang"] = get_language(event.room);
+end
+
+local function add_form_option(event)
+	table.insert(event.form, {
+		name = "muc#roomconfig_lang";
+		label = "Language tag for Room (e.g. 'en', 'de', 'fr' etc.)";
+		type = "text-single";
+		value = get_language(event.room) or "";
+	});
+end
+
+module:hook("muc-disco#info", add_disco_form);
+module:hook("muc-config-form", add_form_option, 100-9.5);
+
+module:hook("muc-config-submitted/muc#roomconfig_lang", function(event)
+	if set_language(event.room, event.value) then
+		event.status_codes["104"] = true;
+	end
+end);
+
+return {
+	get = get_language;
+	set = set_language;
+};