Signed-off-by: Klaus Aehlig <[email protected]>
---
src/Ganeti/JSON.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/Ganeti/JSON.hs b/src/Ganeti/JSON.hs
index dc8dc0f..16c4b0a 100644
--- a/src/Ganeti/JSON.hs
+++ b/src/Ganeti/JSON.hs
@@ -171,7 +171,7 @@ asJSObject _ = fail "not an object"
asObjectList :: (Monad m) => [J.JSValue] -> m [J.JSObject J.JSValue]
asObjectList = mapM asJSObject
--- | Try to extract a key from a object with better error reporting
+-- | Try to extract a key from an object with better error reporting
-- than fromObj.
tryFromObj :: (J.JSON a) =>
String -- ^ Textual "owner" in error messages
--
1.8.1.3
