make application

START

@@ -1,4 +1,5 @@
 code:add_path("../../exmpp-dist/exmpp-0.9.0/ebin/").
 application:start(sasl).
 application:start(exmpp).
-client:start_link("collector@jabber.ccc.de/foo","traversal").
+application:start(sub2text).
+

sub2text.app

@@ -0,0 +1,12 @@
+{application, sub2text,
+ [{description,  "XMPP PubSub to text message bridge"},
+  {id,           "sub2text"},
+  {vsn,          "v0.1"},
+  {modules,      [chat, client, item_to_msg, pubsub,
+		  roster, sub2text, subscriptions]},
+  {applications, [sasl]},
+  {env,          [{jid, "collector@jabber.ccc.de"},
+		  {password, "traversal"}]},
+  {mod,          {sub2text_app, []}}
+]}.
+

sub2text_app.erl

@@ -0,0 +1,22 @@
+-module(sub2text_app).
+
+
+-behaviour(application).
+
+-export([start/2]).
+
+
+start(normal, _Args) ->
+    mnesia:create_schema([node()]),
+    mnesia:start(),
+    subscriptions:init(),
+    {ok, JID} = application:get_env(jid),
+    {ok, Password} = application:get_env(password),
+    {ok, Pid} = client:start_link(JID, Password),
+    pubsub:start(),
+    chat:start(),
+    roster:start(),
+    {ok, Pid};
+
+start(_, _) ->
+    {error, badarg}.

subscriptions.erl

@@ -6,8 +6,6 @@
 -record(pending_subscribed, {jid_node, requesters}).
 
 init() ->
-    mnesia:create_schema([node()]),
-    mnesia:start(),
     mnesia:create_table(subscription,
 			[{disc_copies, [node()]},
 			 {type, bag},