init: improve prompt: 'homepage' field is not for repos.

8603af50 · Brent Yorgey · 14e748d9 · 8603af50
Commit 8603af50 authored Oct 14, 2011 by Brent Yorgey
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

cabal-install/Distribution/Client/Init.hs cabal-install/Distribution/Client/Init.hs +1 -1

No files found.
--- a/cabal-install/Distribution/Client/Init.hs
+++ b/cabal-install/Distribution/Client/Init.hs
@@ -169,7 +169,7 @@ getHomepage :: InitFlags -> IO InitFlags
 getHomepage flags = do
  hp  <- queryHomepage
  hp' <-     return (flagToMaybe $ homepage flags)
-         ?>> maybePrompt flags (promptStr "Project homepage/repo URL" hp)
+         ?>> maybePrompt flags (promptStr "Project homepage URL" hp)
         ?>> return hp

  return $ flags { homepage = maybeToFlag hp' }