jtdaugherty/brick
1
1
Fork 0
mirror of https://github.com/jtdaugherty/brick.git synced 2025-01-06 05:14:11 +03:00
Code Issues Projects Releases Wiki Activity

AttrMap: expose attribute name components

Browse Source
This commit is contained in:
Jonathan Daugherty 2017-10-29 20:26:59 -07:00
parent bc18ad04a5
commit c949fe3077
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Brick/AttrMap.hs
View File

@ -29,6 +29,8 @@ module Brick.AttrMap
, attrMap
, forceAttrMap
, attrName
-- * Inspection
, attrNameComponents
-- * Finding attributes from names
, attrMapLookup
-- * Manipulating attribute maps
@ -84,6 +86,10 @@ data AttrMap = AttrMap Attr (M.Map AttrName Attr)
attrName :: String -> AttrName
attrName = AttrName . (:[])
-- | Get the components of an attribute name.
attrNameComponents :: AttrName -> [String]
attrNameComponents (AttrName cs) = cs
-- | Create an attribute map.
attrMap :: Attr
-- ^ The map's default attribute to be returned when a name