Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/4afed2c9448fcca788260dcc184b8a2fbd78e111

>---------------------------------------------------------------

commit 4afed2c9448fcca788260dcc184b8a2fbd78e111
Author: Duncan Coutts <[email protected]>
Date:   Sun Sep 25 02:17:22 2011 +0000

    Use a PVP-style version as the default for cabal init

>---------------------------------------------------------------

 cabal-install/Distribution/Client/Init.hs |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/cabal-install/Distribution/Client/Init.hs 
b/cabal-install/Distribution/Client/Init.hs
index 97dfad4..b0ea6e5 100644
--- a/cabal-install/Distribution/Client/Init.hs
+++ b/cabal-install/Distribution/Client/Init.hs
@@ -125,11 +125,11 @@ getPackageName flags = do
 
   return $ flags { packageName = maybeToFlag pkgName' }
 
--- | Package version: use 0.1 as a last resort, but try prompting the user if
---   possible.
+-- | Package version: use 0.1.0.0 as a last resort, but try prompting the user
+--  if possible.
 getVersion :: InitFlags -> IO InitFlags
 getVersion flags = do
-  let v = Just $ Version { versionBranch = [0,1], versionTags = [] }
+  let v = Just $ Version { versionBranch = [0,1,0,0], versionTags = [] }
   v' <-     return (flagToMaybe $ version flags)
         ?>> maybePrompt flags (prompt "Package version" v)
         ?>> return v



_______________________________________________
Cvs-libraries mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-libraries

Reply via email to