From 8012e1c0bdd92f3514aa765acad95c78447fdc71 Mon Sep 17 00:00:00 2001 From: Jon Kristensen Date: Mon, 4 Mar 2013 04:59:26 +0100 Subject: [PATCH] Update EchoClient for DNS update, and make it a Cabal project --- examples/{ => echoclient}/EchoClient.hs | 4 ---- examples/echoclient/echoclient.cabal | 12 ++++++++++++ 2 files changed, 12 insertions(+), 4 deletions(-) rename examples/{ => echoclient}/EchoClient.hs (96%) create mode 100755 examples/echoclient/echoclient.cabal diff --git a/examples/EchoClient.hs b/examples/echoclient/EchoClient.hs similarity index 96% rename from examples/EchoClient.hs rename to examples/echoclient/EchoClient.hs index 6cb384b..6b44404 100644 --- a/examples/EchoClient.hs +++ b/examples/echoclient/EchoClient.hs @@ -31,8 +31,6 @@ import System.Log.Handler.Simple import System.Log.Logger -- Server and authentication details. -host = "localhost" -port = PortNumber 5222 realm = "species64739.dyndns.org" username = "echo" password = "pwd" @@ -57,9 +55,7 @@ main = do updateGlobalLogger "Pontarius.Xmpp" (addHandler handler) sess' <- session - host realm - port Nothing -- (Just defaultParamsClient) (Just ([scramSha1 username Nothing password], resource)) sess <- case sess' of diff --git a/examples/echoclient/echoclient.cabal b/examples/echoclient/echoclient.cabal new file mode 100755 index 0000000..bc5724b --- /dev/null +++ b/examples/echoclient/echoclient.cabal @@ -0,0 +1,12 @@ +Name: echoclient +Version: 0.0.0.0 +Cabal-Version: >= 1.6 +Build-Type: Simple +License: OtherLicense +Copyright: Mahdi Abdinejadi, Jon Kristensen, Philipp Balzarek +Maintainer: info@jonkri.com +Synopsis: Echo client test program for Pontarius XMPP + +Executable echoclient + Build-Depends: base, hslogger, mtl, pontarius-xmpp, text, tls + Main-Is: EchoClient.hs \ No newline at end of file