From 289891cacfd408268398fdc0301f7d5e96cc8252 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sat, 1 Jun 2019 14:54:10 -0700
Subject: [PATCH] ;prices: note

[ci skip]
---
 hledger/Hledger/Cli/Commands/Prices.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/hledger/Hledger/Cli/Commands/Prices.hs b/hledger/Hledger/Cli/Commands/Prices.hs
index 6a9ec0ab6..a51a1af07 100755
--- a/hledger/Hledger/Cli/Commands/Prices.hs
+++ b/hledger/Hledger/Cli/Commands/Prices.hs
@@ -50,6 +50,7 @@ divideAmount' n a = a' where
     extPrecision = (1+) . floor . logBase 10 $ (realToFrac n :: Double)
     precision' = extPrecision + asprecision (astyle a)
 
+-- | Invert an amount's price for --invert-cost, somehow (? unclear XXX)
 invertPrice :: Amount -> Amount
 invertPrice a =
     case aprice a of