diff --git a/Logs/Web.hs b/Logs/Web.hs
index 5a2f6e57e9..607c81c5bf 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