diff options
author | Joey Hess <joey@kitenet.net> | 2012-02-18 11:54:47 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-02-18 11:54:47 -0400 |
commit | 0cbbf0da793f6bbffe989007a70953a7593e6841 (patch) | |
tree | c962c60bdde003e26409f8601381e50b7cff11d5 /Logs/Web.hs | |
parent | 00340dfe493ad71a55f4de2c352fc186792363cd (diff) |
warning
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 |