From 9b87dfdfa3d05e1e224c56800f72489b844a7c9b Mon Sep 17 00:00:00 2001
From: Miklos Suveges <miklos.suveges@gmail.com>
Date: Tue, 18 Jan 2022 17:56:51 +0100
Subject: [PATCH] Increase ticker max length to 6

---
 token-metadata-creator/src/Cardano/Metadata/Types.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/token-metadata-creator/src/Cardano/Metadata/Types.hs b/token-metadata-creator/src/Cardano/Metadata/Types.hs
index 9a295b7..f6e1518 100644
--- a/token-metadata-creator/src/Cardano/Metadata/Types.hs
+++ b/token-metadata-creator/src/Cardano/Metadata/Types.hs
@@ -381,7 +381,7 @@ validateMetadataPolicy t = Policy t <$>
 
 validateMetadataTicker :: MonadFail f => Text -> f Ticker
 validateMetadataTicker = fmap Ticker .
-    (validateMinLength 2 >=> validateMaxLength 5)
+    (validateMinLength 2 >=> validateMaxLength 6)
 
 validateMetadataDescription :: MonadFail f => Text -> f Description
 validateMetadataDescription = fmap Description .