cleanup

diff --git a/agitprop.hs b/agitprop.hs
index b67dd0c89892846ee8690eaf30b73d2a5116f625..53a4c62b05aa9735b8691e1d5986d4abaffb6790 100644 (file)
--- a/agitprop.hs
+++ b/agitprop.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE OverloadedStrings #-}
+-- generic AMQP publisher
 
 import Control.Concurrent (threadDelay)
 import qualified Control.Exception as X

diff --git a/konsum.hs b/konsum.hs
index 5f98636e2ba4bf1daff161ac5e2f718a44e4e45f..2db4ca93e59586c0d67d55a94f00e18ffab6d9b5 100644 (file)
--- a/konsum.hs
+++ b/konsum.hs
@@ -1,19 +1,4 @@
-{-# LANGUAGE OverloadedStrings #-}
-
 -- generic amqp consumer
---
--- compile:
--- ghc -O2 -threaded --make konsum.hs
---
--- run:
--- ./konsum
--- ./konsum -o amqp.example.com -p 5673 -T -k amqp-key.pem -c amqp-crt.pem -y vhost -x exchange -X./callback.sh -a -c -a callback.config.sh -f 2 -r routing.key.# -l 500
--- ./konsum -o amqp.example.com -U user -P pass -q queue -t
---
--- custom CA cert via enviroment:
--- $ env SYSTEM_CERTIFICATE_PATH=/etc/amqp/cacert.crt ./konsum -T -y vhost -x exchange
---
--- Stop with ^C
 
 import Control.Concurrent
 import qualified Control.Exception as X