diff --git a/hledger/Hledger/Cli/Utils.hs b/hledger/Hledger/Cli/Utils.hs
index 8ab2af72c..2f18e7e7c 100644
--- a/hledger/Hledger/Cli/Utils.hs
+++ b/hledger/Hledger/Cli/Utils.hs
@@ -141,6 +141,7 @@ journalApplyValue ropts j = do
     return $ convert j
 
 -- | Write some output to stdout or to a file selected by --output-file.
+-- If the file exists it will be overwritten.
 writeOutput :: CliOpts -> String -> IO ()
 writeOutput opts s = do
   f <- outputFileFromOpts opts