From 46a5f1532d56af3fd64780fa1013b47bc4b73e8a Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 12 Mar 2013 15:47:30 -0400 Subject: [PATCH] fix warning --- Assistant/WebApp/Configurators/Local.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Assistant/WebApp/Configurators/Local.hs b/Assistant/WebApp/Configurators/Local.hs index bfd665ee9e..576f171ba8 100644 --- a/Assistant/WebApp/Configurators/Local.hs +++ b/Assistant/WebApp/Configurators/Local.hs @@ -325,7 +325,7 @@ initRepo True primary_assistant_repo dir desc = inDir dir $ do [Param "config", Param "gc.auto", Param "0"] getUUID {- Repo already exists, could be a non-git-annex repo though. -} -initRepo False primary_assistant_repo dir desc = inDir dir $ do +initRepo False _ dir desc = inDir dir $ do unlessM isInitialized $ initialize desc getUUID