From: PHO <pho@cielonegro.org>
Date: Sat, 30 May 2009 01:46:33 +0000 (+0900)
Subject: defaultUserHooks --> simpleUserHooks
X-Git-Url: https://git.cielonegro.org/gitweb.cgi?a=commitdiff_plain;ds=sidebyside;p=haskell-dns.git

defaultUserHooks --> simpleUserHooks
---

diff --git a/Setup.lhs b/Setup.lhs
index 335aacc..d13958a 100644
--- a/Setup.lhs
+++ b/Setup.lhs
@@ -2,7 +2,7 @@
 > import Distribution.Simple
 > import System.Cmd
 > import System.Exit
-> main = defaultMainWithHooks (defaultUserHooks { runTests = runTestUnit })
+> main = defaultMainWithHooks (simpleUserHooks { runTests = runTestUnit })
 >     where
 >       runTestUnit _ _ _ _
 >           = system "./dist/build/DNSUnitTest/DNSUnitTest" >> return ()