add: quote file name consistently in output
Don't show quotes around the journal file path in the "Creating..." message since there aren't any in the subsequent "Adding..." message.
This commit is contained in:
parent
8d75635505
commit
ef890e1b23
@ -187,7 +187,7 @@ ensureJournalFileExists :: FilePath -> IO ()
|
|||||||
ensureJournalFileExists f = do
|
ensureJournalFileExists f = do
|
||||||
exists <- doesFileExist f
|
exists <- doesFileExist f
|
||||||
when (not exists) $ do
|
when (not exists) $ do
|
||||||
hPrintf stderr "Creating hledger journal file \"%s\".\n" f
|
hPrintf stderr "Creating hledger journal file %s.\n" f
|
||||||
-- note Hledger.Utils.UTF8.* do no line ending conversion on windows,
|
-- note Hledger.Utils.UTF8.* do no line ending conversion on windows,
|
||||||
-- we currently require unix line endings on all platforms.
|
-- we currently require unix line endings on all platforms.
|
||||||
newJournalContent >>= writeFile f
|
newJournalContent >>= writeFile f
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user