diff options
| author | Paolo Capriotti <p.capriotti@gmail.com> | 2012-05-15 10:32:58 +0100 |
|---|---|---|
| committer | Paolo Capriotti <p.capriotti@gmail.com> | 2012-05-15 10:32:58 +0100 |
| commit | 921530b477867edb5158e4ad5bbbdb5c7c531c97 (patch) | |
| tree | 61db463fdbbe959f7e441ddbd78501ec1a4a45ef /libraries/bin-package-db/Distribution | |
| parent | 215c8265e72a7f2a8d57793d5a5dec4c0deed08a (diff) | |
| download | haskell-921530b477867edb5158e4ad5bbbdb5c7c531c97.tar.gz | |
Follow changes in Cabal.
Diffstat (limited to 'libraries/bin-package-db/Distribution')
| -rw-r--r-- | libraries/bin-package-db/Distribution/InstalledPackageInfo/Binary.hs | 4 |
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 |