diff options
| author | Paul Oliver <contact@pauloliver.dev> | 2025-08-19 03:56:40 +0000 |
|---|---|---|
| committer | Paul Oliver <contact@pauloliver.dev> | 2025-08-23 22:59:12 +0000 |
| commit | 307cb1b1094c73fd15eab378c27ac0073696b739 (patch) | |
| tree | 730949857bd356a7d1f1739b1c8c28967d0461e4 /hsm-repl | |
| parent | 4efe903a671b288ac485f2d2a9c9aabf2eb7b199 (diff) | |
Improves formatting
Diffstat (limited to 'hsm-repl')
| -rw-r--r-- | hsm-repl/Hsm/Repl.hs | 4 |
1 files changed, 2 insertions, 2 deletions
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 <- |