diff options
| author | Stephen Paul Weber <singpolyma@singpolyma.net> | 2012-04-27 15:01:11 -0500 |
|---|---|---|
| committer | Stephen Paul Weber <singpolyma@singpolyma.net> | 2012-04-27 15:01:11 -0500 |
| commit | cb2a5013f8c831591841404cb4a7c8201c522ad2 (patch) | |
| tree | 2b745c38af9c6f943af9baf4b5a678bdb449c6c7 /Data | |
| parent | bca49f3b15fcb8d52fe9d67cd96d702fe06741b5 (diff) | |
formatting
Diffstat (limited to 'Data')
| -rw-r--r-- | Data/OpenPGP.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/Data/OpenPGP.hs b/Data/OpenPGP.hs index 1fc3192..68c3d51 100644 --- a/Data/OpenPGP.hs +++ b/Data/OpenPGP.hs | |||
| @@ -716,8 +716,7 @@ parse_signature_subpacket 3 = fmap SignatureExpirationTimePacket get | |||
| 716 | parse_signature_subpacket 4 = | 716 | parse_signature_subpacket 4 = |
| 717 | fmap (ExportableCertificationPacket . enum_from_word8) get | 717 | fmap (ExportableCertificationPacket . enum_from_word8) get |
| 718 | -- TrustSignaturePacket, http://tools.ietf.org/html/rfc4880#section-5.2.3.13 | 718 | -- TrustSignaturePacket, http://tools.ietf.org/html/rfc4880#section-5.2.3.13 |
| 719 | parse_signature_subpacket 5 = | 719 | parse_signature_subpacket 5 = liftM2 TrustSignaturePacket get get |
| 720 | liftM2 TrustSignaturePacket get get | ||
| 721 | -- TrustSignaturePacket, http://tools.ietf.org/html/rfc4880#section-5.2.3.14 | 720 | -- TrustSignaturePacket, http://tools.ietf.org/html/rfc4880#section-5.2.3.14 |
| 722 | parse_signature_subpacket 6 = fmap | 721 | parse_signature_subpacket 6 = fmap |
| 723 | (RegularExpressionPacket . B.toString . B.init) getRemainingByteString | 722 | (RegularExpressionPacket . B.toString . B.init) getRemainingByteString |