geUnit :: Header
rangeUnit = ("Range-Unit" :: CI BS.ByteString, "items")

m
rangeUnit :: Header
rangeUnit = ("Range-Unit" :: CI BS.ByteString, "items")
rangeUnit = ("Range-Unit" :: CI BS.ByteString, "items")