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 | |
| parent | 00340dfe493ad71a55f4de2c352fc186792363cd (diff) | |
warning
| -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 |