diff options
Diffstat (limited to '')
| -rw-r--r-- | src/Conftrack.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Conftrack.hs b/src/Conftrack.hs index 0f40048..d6e68e2 100644 --- a/src/Conftrack.hs +++ b/src/Conftrack.hs @@ -69,7 +69,7 @@ readValue bareKey = do Left e -> Left e val <- case fmap (\(Right a) -> a) $ NonEmpty.filter isRight values of - [] -> lift $ throwE [NotPresent] + [] -> lift $ throwE [NotPresent key] val:_ -> pure val put (states, prefix, snd val : origins, warnings) |