@@ -560,8 +560,8 @@ data Image = DockerImage {
560560 imageId :: ImageID
561561 , imageCreated :: Integer
562562 , imageParentId :: Maybe ImageID
563− , imageRepoTags :: Maybe [Tag]
564− , imageRepoDigests :: Maybe [Digest]
563+ , imageRepoTags :: [Tag]
564+ , imageRepoDigests :: [Digest]
565565 , imageSize :: Integer
566566 , imageVirtualSize :: Integer
567567 , imageLabels :: [Label]
@@ -578,8 +578,8 @@ instance FromJSON Image where
578578 imageId <- o .: "Id"
579579 imageCreated <- o .: "Created"
580580 imageParentId <- o .:? "ParentId"
581− imageRepoTags <- o .:? "RepoTags"
582− imageRepoDigests <- o .:? "RepoDigests"
581+ imageRepoTags <- o .:? "RepoTags" .!= []
582+ imageRepoDigests <- o .:? "RepoDigests" .!= []
583583 imageSize <- o .: "Size"
584584 imageVirtualSize <- o .: "VirtualSize"
585585 imageLabels <- case HM.lookup "Labels" o of