Using Hidden also. (#223)
This commit is contained in:
parent
aecb9bc1e4
commit
f2081466fc
@ -83,6 +83,7 @@ packageLine :: String -> Maybe Package
|
|||||||
packageLine l =
|
packageLine l =
|
||||||
case listToMaybe $ readP_to_S packageLineP l of
|
case listToMaybe $ readP_to_S packageLineP l of
|
||||||
Just ((Normal,p),_) -> Just p
|
Just ((Normal,p),_) -> Just p
|
||||||
|
Just ((Hidden,p),_) -> Just p
|
||||||
_ -> Nothing
|
_ -> Nothing
|
||||||
|
|
||||||
data PackageState = Normal | Hidden | Broken deriving (Eq,Show)
|
data PackageState = Normal | Hidden | Broken deriving (Eq,Show)
|
||||||
|
Loading…
Reference in New Issue
Block a user