diff options
Diffstat (limited to 'Logs/Web.hs')
| -rw-r--r-- | Logs/Web.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Logs/Web.hs b/Logs/Web.hs index 5a2f6e57e..607c81c5b 100644 --- a/Logs/Web.hs +++ b/Logs/Web.hs @@ -52,8 +52,8 @@ setUrl key url status = do addLog (urlLog key) =<< logNow status url -- update location log to indicate that the web has the key, or not - us <- getUrls key - logChange key webUUID (if null us then InfoMissing else InfoPresent) + us' <- getUrls key + logChange key webUUID (if null us' then InfoMissing else InfoPresent) setUrlPresent :: Key -> URLString -> Annex () setUrlPresent key url = setUrl key url InfoPresent |