diff --git a/src/Simplex/Messaging/Crypto/Entitlement.hs b/src/Simplex/Messaging/Crypto/Entitlement.hs
index edef28f59..5579df966 100644
--- a/src/Simplex/Messaging/Crypto/Entitlement.hs
+++ b/src/Simplex/Messaging/Crypto/Entitlement.hs
@@ -95,7 +95,7 @@ entitlementMessageCount :: Int
 entitlementMessageCount = 4
 
 entitlementDisclosedIndexes :: [Int]
-entitlementDisclosedIndexes = [1 .. entitlementMessageCount - 1]
+entitlementDisclosedIndexes = [1, 2, 3]
 
 entitlementMessages :: MasterKey -> Entitlement -> [ByteString]
 entitlementMessages (MasterKey mk) ent = mk : disclosedMessages ent