only push when needsinit

Assistant/WebApp/Configurators/Ssh.hs

@@ -506,6 +506,7 @@ prepSsh' needsinit origsshdata sshdata keypair a
 		{- To ensure the repository is initialized, try to push the
 		 - git-annex branch to it. Then git-annex-shell will see
 		 - the branch and auto-initialize. -}
+		when needsinit $ do
 			void $ liftAnnex $ inRepo $ Git.Command.runBool
 				[ Param "push"
 				, Param (genSshUrl sshdata)