From 978247270f370aa624c8f3b377f38663e65d4ea0 Mon Sep 17 00:00:00 2001 From: Greg Hale Date: Tue, 8 Aug 2023 16:25:40 -0700 Subject: [PATCH] quick check --- src/Pact/Types/Util.hs | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/Pact/Types/Util.hs b/src/Pact/Types/Util.hs index acb46420e..4c120a01a 100644 --- a/src/Pact/Types/Util.hs +++ b/src/Pact/Types/Util.hs @@ -348,6 +348,9 @@ base64DowngradeErrorMessage base64DowngradeErrorMessage (L.stripPrefix "invalid padding at offset: " -> Just suffix) = "invalid padding near offset " <> suffix +base64DowngradeErrorMessage + (L.stripPrefix "invalid padding near offset " -> Just suffix) = + "SANITY CHECK " <> suffix base64DowngradeErrorMessage "Base64-encoded bytestring has invalid size" = "invalid base64 encoding near offset 0"