From f0ad1b0b488a464c64b3009636e5ba265f9e4eddf42b2bd98661c5fa81f982d0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ond=C5=99ej=20S=C3=BAkup?= Date: Mon, 15 Mar 2021 12:28:22 +0000 Subject: [PATCH] OBS-URL: https://build.opensuse.org/package/show/devel:languages:haskell/hledger-interest?expand=0&rev=13 --- hledger.patch | 35 ----------------------------------- 1 file changed, 35 deletions(-) delete mode 100644 hledger.patch diff --git a/hledger.patch b/hledger.patch deleted file mode 100644 index 1540b11..0000000 --- a/hledger.patch +++ /dev/null @@ -1,35 +0,0 @@ -From e0694605be0c89c9b97629a893696a7947dc7fcb Mon Sep 17 00:00:00 2001 -From: Dmitry Astapov -Date: Wed, 10 Mar 2021 23:47:56 +0000 -Subject: [PATCH] Allow building with hledger-lib version 1.21.x - ---- - Main.hs | 6 +++--- - hledger-interest.cabal | 4 ++-- - 2 files changed, 5 insertions(+), 5 deletions(-) - -diff --git a/Main.hs b/Main.hs -index 042da78..bb07b7b 100644 ---- a/Main.hs -+++ b/Main.hs -@@ -95,12 +95,12 @@ main = bracket (return ()) (\() -> hFlush stdout >> hFlush stderr) $ \() -> do - jnl' <- readJournalFiles ledgerInputOptions (reverse (optInput opts)) >>= either fail return - interestAcc <- case args of - [] -> commandLineError "required argument ACCOUNT is missing\n" -- [acc] -> return acc -+ [acc] -> return $ T.pack acc - _ -> commandLineError "only one interest ACCOUNT may be specified\n" - let jnl = filterJournalTransactions (Acct (toRegex' interestAcc)) jnl' - ts = sortOn tdate (jtxns jnl) - cfg = Config -- { interestAccount = T.pack interestAcc -+ { interestAccount = interestAcc - , sourceAccount = T.pack (optSourceAcc opts) - , targetAccount = T.pack (optTargetAcc opts) - , dayCountConvention = fromJust (optDCC opts) -@@ -114,4 +114,4 @@ main = bracket (return ()) (\() -> hFlush stdout >> hFlush stderr) $ \() -> do - result - | optVerbose opts = ts' ++ ts - | otherwise = ts' -- mapM_ (putStr . showTransactionUnelided) (sortOn tdate result) -+ mapM_ (putStr . T.unpack . showTransaction) (sortOn tdate result)