diff --git a/aur-api.cabal b/aur-api.cabal --- a/aur-api.cabal +++ b/aur-api.cabal @@ -1,9 +1,9 @@ name: aur-api -version: 0.1.1.0 +version: 0.1.2.1 synopsis: ArchLinux AUR json v5 API description: Implements ArchLinux AUR json v5 API defined at: . - https://wiki.archlinux.org/index.php/AurJson + . homepage: https://github.com/wangbj/aur-api license: BSD3 diff --git a/src/Distribution/ArchLinux/AUR/Types.hs b/src/Distribution/ArchLinux/AUR/Types.hs --- a/src/Distribution/ArchLinux/AUR/Types.hs +++ b/src/Distribution/ArchLinux/AUR/Types.hs @@ -79,15 +79,15 @@ , packagePackageBaseID :: Int , packagePackageBase :: Text , packageVersion :: Text - , packageDescription :: Text - , packageURL :: Text + , packageDescription :: Maybe Text + , packageURL :: Maybe Text , packageNumVotes :: Int , packagePopularity :: Double , packageOutOfDate :: Maybe Int , packageMaintainer :: Maybe Text , packageFirstSubmitted :: Int , packageLastModified :: Int - , packageURLPath :: Text + , packageURLPath :: Maybe Text , packageDepends :: [Text] , packageMakeDepends :: [Text] , packageOptDepends :: [Text] @@ -103,15 +103,15 @@ <*> v .: "PackageBaseID" <*> v .: "PackageBase" <*> v .: "Version" - <*> v .: "Description" - <*> v .: "URL" + <*> v .:? "Description" + <*> v .:? "URL" <*> v .: "NumVotes" <*> v .: "Popularity" <*> v .: "OutOfDate" <*> v .:? "Maintainer" <*> v .: "FirstSubmitted" <*> v .: "LastModified" - <*> v .: "URLPath" + <*> v .:? "URLPath" <*> v .:! "Depends" .!= [] <*> v .:! "MakeDepends" .!= [] <*> v .:! "OptDepends" .!= []