diff options
Diffstat (limited to 'Annex/Journal.hs')
| -rw-r--r-- | Annex/Journal.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Annex/Journal.hs b/Annex/Journal.hs index ff103180e..4a56ce3e3 100644 --- a/Annex/Journal.hs +++ b/Annex/Journal.hs @@ -47,8 +47,8 @@ getJournalledFiles = map fileJournal <$> getJournalFiles getJournalFiles :: Annex [FilePath] getJournalFiles = do g <- gitRepo - fs <- liftIO $ - catchDefaultIO (getDirectoryContents $ gitAnnexJournalDir g) [] + fs <- liftIO $ catchDefaultIO [] $ + getDirectoryContents $ gitAnnexJournalDir g return $ filter (`notElem` [".", ".."]) fs {- Checks if there are changes in the journal. -} |