From c9b53e4e7f251c2de311225c1437eafddb261c32 Mon Sep 17 00:00:00 2001
From: Frank Doepper <fd@taz.de>
Date: Tue, 17 Sep 2019 16:17:40 +0200
Subject: [PATCH] agitprop: show exchange arg

---
 agitprop.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/agitprop.hs b/agitprop.hs
index bf3fe59..4e37b47 100644
--- a/agitprop.hs
+++ b/agitprop.hs
@@ -32,6 +32,7 @@ main = do
   args <- getArgs >>= parseargs 'a'
   printparam' "client version" $ "amqp-utils " ++ (showVersion version)
   printparam' "routing key" $ rKey args
+  printparam' "exchange" $ currentExchange args
   isDir <- F.getFileStatus (inputFile args) >>= return . F.isDirectory
   if isDir
     then printparam' "hotfolder" $ inputFile args
-- 
2.39.5