Follow changes in Cabal.
authorPaolo Capriotti <p.capriotti@gmail.com>
Tue, 15 May 2012 09:32:58 +0000 (10:32 +0100)
committerPaolo Capriotti <p.capriotti@gmail.com>
Tue, 15 May 2012 09:32:58 +0000 (10:32 +0100)
libraries/bin-package-db/Distribution/InstalledPackageInfo/Binary.hs

index 242b7c0..7a254b7 100644 (file)
@@ -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