From 00f3838fdb81fef2fed80554582f0f17a59c6977 Mon Sep 17 00:00:00 2001 From: Stephen Paul Weber Date: Fri, 27 Apr 2012 18:13:11 -0500 Subject: whitespace --- Data/OpenPGP.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Data') diff --git a/Data/OpenPGP.hs b/Data/OpenPGP.hs index e3a0a54..012eead 100644 --- a/Data/OpenPGP.hs +++ b/Data/OpenPGP.hs @@ -802,7 +802,7 @@ put_signature_subpacket (PrimaryUserIDPacket isprimary) = put_signature_subpacket (PolicyURIPacket uri) = (B.fromString uri, 26) put_signature_subpacket (KeyFlagsPacket certify sign encryptC encryptS split auth group) = - ( B.singleton $ + (B.singleton $ flag 0x01 certify .|. flag 0x02 sign .|. flag 0x04 encryptC .|. -- cgit v1.2.3