Merge pull request #41 from input-output-hk/piotr/fliter/whitespace

Filter whitespaces from bech32 stdin
IntersectMBO · Nov 4, 2021 · 89b35a7 · 89b35a7
2 parents 8044239 + 791c25b
commit 89b35a7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/bech32/app/Main.hs b/bech32/app/Main.hs
@@ -144,7 +144,7 @@ run :: Cmd -> IO ()
 run cmd = case cmd of
     VersionCmd -> putStrLn $ showVersion version
     RunCmd {prefix} -> do
-        source <- T.decodeUtf8 . B8.filter (/= '\n') <$> B8.hGetContents stdin
+        source <- T.strip . T.decodeUtf8 <$> B8.hGetContents stdin
         case prefix of
             Nothing  -> runDecode source
             Just hrp -> runEncode hrp source