2 -- Copyright (C) 2008-2010 Matthew Wild
3 -- Copyright (C) 2008-2010 Waqas Hussain
5 -- This project is MIT/X11 licensed. Please see the
6 -- COPYING file in the source package for more information.
9 local host = module:get_host();
10 local welcome_text = module:get_option("welcome_message") or "Hello $username, welcome to the $host IM server!";
12 local st = require "util.stanza";
14 module:hook("user-registered",
16 local welcome_stanza =
17 st.message({ to = user.username.."@"..user.host, from = host })
18 :tag("body"):text(welcome_text:gsub("$(%w+)", user));
19 module:send(welcome_stanza);
20 module:log("debug", "Welcomed user %s@%s", user.username, user.host);