From eccc932258fb952e87e13a02c56bd7632a6bb259 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Wed, 4 Jul 2007 03:41:15 +0000
Subject: [PATCH] selftest -> test

---
 hledger.hs | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/hledger.hs b/hledger.hs
index a06220a53..cd81b7d9a 100644
--- a/hledger.hs
+++ b/hledger.hs
@@ -16,7 +16,7 @@ import Options
 import Models
 import Parse
 import Tests
-import Utils
+import Utils hiding (test)
 
 
 main :: IO ()
@@ -28,13 +28,13 @@ main = do
             | Help `elem` opts            = putStr usage
             | cmd `isPrefixOf` "register" = register opts acctpats descpats
             | cmd `isPrefixOf` "balance"  = balance opts acctpats descpats
-            | cmd `isPrefixOf` "test"     = selftest
+            | cmd `isPrefixOf` "test"     = test
             | otherwise                   = putStr usage
 
 -- commands
 
-selftest :: IO () -- "hledger test"
-selftest = do
+test :: IO ()
+test = do
   Tests.hunit
   Tests.quickcheck
   return ()