fix intro display when there is 1 remote

Assistant/WebApp/Configurators.hs

@@ -47,11 +47,8 @@ introDisplay ident = do
 	repolist <- lift $ repoList True False
 	let n = length repolist
 	let numrepos = show n
-	let notenough = n < enough
 	$(widgetFile "configurators/intro")
 	lift $ modifyWebAppState $ \s -> s { showIntro = False }
-	where
-		enough = 2
 
 {- Lists known repositories, followed by options to add more. -}
 getRepositoriesR :: Handler RepHtml

templates/configurators/intro.hamlet

@@ -4,7 +4,7 @@
       git-annex is watching over your files in <small><tt>#{reldir}</tt></small>
     <p>
       It will automatically notice changes, and keep files in sync #
-      $if notenough
+      $if (null repolist)
         with repositories elsewhere ...
         <h2>
           But no other repositories are set up yet.