From 3bca3cfa0ffcc720028dcfe918d6e1c7d1b5d605 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Fri, 3 Oct 2008 00:22:17 +0000 Subject: [PATCH] move Currency to Ledger/ --- Amount.hs | 2 +- Currency.hs => Ledger/Currency.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) rename Currency.hs => Ledger/Currency.hs (97%) diff --git a/Amount.hs b/Amount.hs index 275f8e6b5..9434bd292 100644 --- a/Amount.hs +++ b/Amount.hs @@ -38,7 +38,7 @@ module Amount where import Ledger.Utils import Ledger.Types -import Currency +import Ledger.Currency tests = runTestTT $ test [ show (dollars 1) ~?= "$1.00" diff --git a/Currency.hs b/Ledger/Currency.hs similarity index 97% rename from Currency.hs rename to Ledger/Currency.hs index 424c3bf09..3284e627d 100644 --- a/Currency.hs +++ b/Ledger/Currency.hs @@ -1,4 +1,4 @@ -module Currency +module Ledger.Currency where import qualified Data.Map as Map import Data.Map ((!))