From f58aa9f40b403fc3f5760d5fdb920ca7e0140d27 Mon Sep 17 00:00:00 2001 From: joe Date: Mon, 19 May 2014 02:44:23 -0400 Subject: fixed typos --- TLSA.hs | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/TLSA.hs b/TLSA.hs index 16cc568..1ef6fb4 100644 --- a/TLSA.hs +++ b/TLSA.hs @@ -89,8 +89,8 @@ instance Enum Selector where toEnum 1 = SubjectPublicKeyInfo toEnum n = Selector (toEnum n) --- | Is 'associationData' the an object of the form specified by 'Selector' or --- is it only a hash of it? +-- | Is 'associationData' an object of the form specified by 'Selector' or is +-- it only a hash of it? data MatchingType = Match_Exact | Match_SHA256 @@ -112,9 +112,9 @@ instance Enum MatchingType where -- | The parsed RDATA field of a TLSA DNS resource record (type 52) as -- described in RFC 6698. -- --- Use the 'match' function uses 'selector', 'matchingType' and --- 'associationData' to implement a predicate on certificates obtained via the --- TLS protocol. The 'certUsage' field indicates what that predicate means. +-- The 'match' function uses 'selector', 'matchingType' and 'associationData' +-- to implement a predicate on certificates obtained via the TLS protocol. The +-- 'certUsage' field indicates what that predicate means. data TLSA = TLSA { certUsage :: CertUsage , selector :: Selector -- cgit v1.2.3