From 52a6eaad9c6d67874ecd7b6a7b3c8d2d4d213f1d Mon Sep 17 00:00:00 2001
From: Kazu Yamamoto <kazu@iij.ad.jp>
Date: Tue, 23 Mar 2010 20:27:15 +0900
Subject: introducing ResolvSeed.

---
 Network/DNS/Query.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Network/DNS/Query.hs')

diff --git a/Network/DNS/Query.hs b/Network/DNS/Query.hs
index db30bd8..66bfb31 100644
--- a/Network/DNS/Query.hs
+++ b/Network/DNS/Query.hs
@@ -49,7 +49,7 @@ encodeFlags _ = put16 0x0100 -- xxx
 
 encodeQuestion :: [Question] -> SPut
 encodeQuestion qs = do
-  let q = head qs 
+  let q = head qs
       dom = qname q
       typ = qtype q
   encodeDomain dom
-- 
cgit v1.2.3