document UniqueList

This commit is contained in:
Greg Weber 2013-05-06 16:57:13 -05:00
parent 8bde1b592f
commit eb779fb0f6

View File

@ -300,6 +300,8 @@ data Header =
data Location url = Local url | Remote Text
deriving (Show, Eq)
-- | A diff list that does not directly enforce uniqueness.
-- When creating a widget Yesod will use nub to make it unique.
newtype UniqueList x = UniqueList ([x] -> [x])
data Script url = Script { scriptLocation :: Location url, scriptAttributes :: [(Text, Text)] }