From 45bb513eb865b450cf7ea1796041e5fa97a5c856 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Tue, 16 Jul 2019 23:58:50 +0100 Subject: [PATCH] bin: smooth, swap-dates: fix compile.sh warnings (#1072) [ci skip] --- bin/hledger-smooth.hs | 2 +- bin/hledger-swap-dates.hs | 2 -- 2 files changed, 1 insertion(+), 3 deletions(-) diff --git a/bin/hledger-smooth.hs b/bin/hledger-smooth.hs index 3c0b76637..5e3e2134b 100755 --- a/bin/hledger-smooth.hs +++ b/bin/hledger-smooth.hs @@ -85,7 +85,7 @@ main = do -- into equivalent daily postings up to the next given end date, -- keeping track of remaining end dates. splitTransactionPostings :: Query -> AccountName -> [Day] -> Transaction -> ([Day], Transaction) -splitTransactionPostings q acct dates t +splitTransactionPostings _q acct dates t -- | q `matchesTransaction` t = (dates', t') -- | otherwise = (dates, t) | otherwise = (dates', t') diff --git a/bin/hledger-swap-dates.hs b/bin/hledger-swap-dates.hs index 7d2cdf4cd..6efeffc3c 100755 --- a/bin/hledger-swap-dates.hs +++ b/bin/hledger-swap-dates.hs @@ -11,9 +11,7 @@ {-# LANGUAGE QuasiQuotes #-} {-# LANGUAGE RecordWildCards #-} -import Data.List import Data.String.Here -import qualified Data.Text.IO as T import Hledger import Hledger.Cli