diff options
Diffstat (limited to 'Command/Smudge.hs')
-rw-r--r-- | Command/Smudge.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Smudge.hs b/Command/Smudge.hs index 52367d499..933a0a01e 100644 --- a/Command/Smudge.hs +++ b/Command/Smudge.hs @@ -47,6 +47,7 @@ smudge file = do case parseLinkOrPointer b of Nothing -> liftIO $ B.putStr b Just k -> do + Database.Keys.addAssociatedFile k =<< inRepo (toTopFilePath file) -- A previous unlocked checkout of the file may have -- led to the annex object getting modified; -- don't provide such modified content as it @@ -61,7 +62,6 @@ smudge file = do =<< catchMaybeIO (B.readFile content) , liftIO $ B.putStr b ) - Database.Keys.addAssociatedFile k =<< inRepo (toTopFilePath file) stop -- Clean filter is fed file content on stdin, decides if a file |