From 0697dbe2d29d084bccb7f6a7c29c996849bf7455 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Mon, 18 Oct 2021 16:25:00 -0400
Subject: [PATCH] rename to avoid warning

a new version of persistent exports an "exists"
---
 Assistant/WebApp/Configurators/IA.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Assistant/WebApp/Configurators/IA.hs b/Assistant/WebApp/Configurators/IA.hs
index d6d2bd16fa..1b2d05e6e2 100644
--- a/Assistant/WebApp/Configurators/IA.hs
+++ b/Assistant/WebApp/Configurators/IA.hs
@@ -180,11 +180,11 @@ escapeHeader = escapeURIString (\c -> isUnescapedInURI c && c /= ' ')
 getRepoInfo :: RemoteConfig -> Widget
 getRepoInfo c = do
 	uo <- liftAnnex Url.getUrlOptions
-	exists <- liftAnnex $ catchDefaultIO False $ Url.exists url uo
+	urlexists <- liftAnnex $ catchDefaultIO False $ Url.exists url uo
 	[whamlet|
 <a href="#{url}">
   Internet Archive item
-$if (not exists)
+$if (not urlexists)
   <p>
     The page will only be available once some files #
     have been uploaded, and the Internet Archive has processed them.
-- 
2.30.2