fix warning
This commit is contained in:
parent
1c387175eb
commit
ae4177d456
1 changed files with 1 additions and 1 deletions
|
@ -55,7 +55,7 @@ getTransitionCalculator ForgetDeadRemotes = Just dropDead
|
||||||
-- is not removed from the remote log, for the same reason the trust log
|
-- is not removed from the remote log, for the same reason the trust log
|
||||||
-- is not changed.
|
-- is not changed.
|
||||||
dropDead :: TransitionCalculator
|
dropDead :: TransitionCalculator
|
||||||
dropDead config trustmap remoteconfigmap f content = case getLogVariety config f of
|
dropDead gc trustmap remoteconfigmap f content = case getLogVariety gc f of
|
||||||
Just OldUUIDBasedLog
|
Just OldUUIDBasedLog
|
||||||
| f == trustLog -> PreserveFile
|
| f == trustLog -> PreserveFile
|
||||||
| f == remoteLog -> ChangeFile $
|
| f == remoteLog -> ChangeFile $
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue