diff --git a/src/Ganeti/JSON.hs b/src/Ganeti/JSON.hs
index dc8dc0fe824b5a52b808c98fe9a403359fade339..16c4b0ad4e8c72c192601943ed3c5c4f99ac611b 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