diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-08-26 14:26:43 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-08-26 14:26:43 -0400 |
| commit | 78d3add86b564149cd1e7c4527deffbf30cf839b (patch) | |
| tree | 6c5d54557f30dc1bafcf6b52eca31c5a75b31df8 /Assistant/Threads/MountWatcher.hs | |
| parent | 20a451a58bf6be3359d458cebb9e9e192313e11a (diff) | |
tweak field name
Diffstat (limited to 'Assistant/Threads/MountWatcher.hs')
| -rw-r--r-- | Assistant/Threads/MountWatcher.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/MountWatcher.hs b/Assistant/Threads/MountWatcher.hs index 2d9b5a82b..cc7495602 100644 --- a/Assistant/Threads/MountWatcher.hs +++ b/Assistant/Threads/MountWatcher.hs @@ -175,7 +175,7 @@ remotesUnder st dstatus dir = runThreadState st $ do updateKnownRemotes dstatus return $ map snd $ filter fst pairs where - checkremote repotop r = case Remote.path r of + checkremote repotop r = case Remote.localpath r of Just p | dirContains dir (absPathFrom repotop p) -> (,) <$> pure True <*> updateRemote r _ -> return (False, r) |