summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPaolo Capriotti <p.capriotti@gmail.com>2012-05-15 10:32:58 +0100
committerPaolo Capriotti <p.capriotti@gmail.com>2012-05-15 10:32:58 +0100
commit921530b477867edb5158e4ad5bbbdb5c7c531c97 (patch)
tree61db463fdbbe959f7e441ddbd78501ec1a4a45ef
parent215c8265e72a7f2a8d57793d5a5dec4c0deed08a (diff)
downloadhaskell-921530b477867edb5158e4ad5bbbdb5c7c531c97.tar.gz
Follow changes in Cabal.
-rw-r--r--libraries/bin-package-db/Distribution/InstalledPackageInfo/Binary.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/libraries/bin-package-db/Distribution/InstalledPackageInfo/Binary.hs b/libraries/bin-package-db/Distribution/InstalledPackageInfo/Binary.hs
index 242b7c02d1..7a254b7ac6 100644
--- a/libraries/bin-package-db/Distribution/InstalledPackageInfo/Binary.hs
+++ b/libraries/bin-package-db/Distribution/InstalledPackageInfo/Binary.hs
@@ -136,7 +136,8 @@ instance Binary License where
put PublicDomain = do putWord8 5
put AllRightsReserved = do putWord8 6
put OtherLicense = do putWord8 7
- put (UnknownLicense str) = do putWord8 8; put str
+ put (Apache v) = do putWord8 8; put v
+ put (UnknownLicense str) = do putWord8 9; put str
get = do
n <- getWord8
@@ -149,6 +150,7 @@ instance Binary License where
5 -> return PublicDomain
6 -> return AllRightsReserved
7 -> return OtherLicense
+ 8 -> do v <- get; return (Apache v)
_ -> do str <- get; return (UnknownLicense str)
instance Binary Version where