From 307cb1b1094c73fd15eab378c27ac0073696b739 Mon Sep 17 00:00:00 2001 From: Paul Oliver Date: Tue, 19 Aug 2025 03:56:40 +0000 Subject: Improves formatting --- hsm-repl/Hsm/Repl.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'hsm-repl/Hsm') diff --git a/hsm-repl/Hsm/Repl.hs b/hsm-repl/Hsm/Repl.hs index 5265e59..bcde6ad 100644 --- a/hsm-repl/Hsm/Repl.hs +++ b/hsm-repl/Hsm/Repl.hs @@ -68,8 +68,8 @@ repl = query >>= maybe (return Nothing) parse . queryInput inputState . handleInterrupt (return Nothing) . withInterrupt - . getInputLine - $ symbolVal (Proxy @p) + . getInputLine $ + symbolVal (Proxy @p) parse string = do logMsg Trace $ "Parsing string: " <> string eitherValue <- -- cgit v1.2.1