mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

invalidated the wrong cache when setting preferred content

Browse source
This commit is contained in:
Joey Hess 2013-03-31 19:00:14 -04:00
parent 0eeb8d0508
commit 91b7de97e8
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Logs/PreferredContent.hs
View file

@ -43,7 +43,7 @@ preferredContentSet uuid@(UUID _) val = do
ts <- liftIO getPOSIXTime ts <- liftIO getPOSIXTime
Annex.Branch.change preferredContentLog $ Annex.Branch.change preferredContentLog $
showLog id . changeLog ts uuid val . parseLog Just showLog id . changeLog ts uuid val . parseLog Just
Annex.changeState $ \s -> s { Annex.groupmap = Nothing } Annex.changeState $ \s -> s { Annex.preferredcontentmap = Nothing }
preferredContentSet NoUUID _ = error "unknown UUID; cannot modify" preferredContentSet NoUUID _ = error "unknown UUID; cannot modify"
{- Checks if a file is preferred content for the specified repository {- Checks if a file is preferred content for the specified repository