From 2535a7ee05b9f9cc9f7474e6498ecb9369a54e39 Mon Sep 17 00:00:00 2001
From: Rnhmjoj <micheleguerinirocco@me.com>
Date: Sat, 27 Dec 2014 03:32:19 +0100
Subject: [PATCH] Remove unused variable

---
 Main.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/Main.hs b/Main.hs
index e5ba766..861d94a 100644
--- a/Main.hs
+++ b/Main.hs
@@ -43,12 +43,11 @@ main = interface >>= flip runApp exec
 
 
 exec :: ProgArgs -> IO ()
-exec args@ProgArgs{..} =
+exec ProgArgs{..} = do
     if dnschain
     then handleDnschain url name raw
     else handleLocal name block
 
-
 handleLocal :: String -> Bool -> IO ()
 handleLocal name block = do
     out <- readProcess "namecoind" ["name_show", name] ""