From e499efce7753f937ac4c14fd7d503b78e4bddf05 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sun, 11 Jul 2010 22:17:48 +0000
Subject: [PATCH] type signature

---
 hledger-lib/Hledger/Data/Posting.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/hledger-lib/Hledger/Data/Posting.hs b/hledger-lib/Hledger/Data/Posting.hs
index 930fde727..1343ceab9 100644
--- a/hledger-lib/Hledger/Data/Posting.hs
+++ b/hledger-lib/Hledger/Data/Posting.hs
@@ -35,6 +35,7 @@ showPosting (Posting{paccount=a,pamount=amt,pcomment=com,ptype=t}) =
       showamount = padleft 12 . showMixedAmountOrZero
       comment = if null com then "" else "  ; " ++ com
 -- XXX refactor
+showPostingForRegister :: Posting -> String
 showPostingForRegister (Posting{paccount=a,pamount=amt,ptype=t}) =
     concatTopPadded [showaccountname a ++ " ", showamount amt]
     where