diff --git a/Text/Megaparsec/Lexer.hs b/Text/Megaparsec/Lexer.hs
index 56be9bf..c7baafa 100644
--- a/Text/Megaparsec/Lexer.hs
+++ b/Text/Megaparsec/Lexer.hs
@@ -273,7 +273,7 @@ number = (Right <$> try float) <|> (Left <$> integer) <?> "number"
 --
 -- > lexeme        = L.lexeme spaceConsumer
 -- > integer       = lexeme L.integer
--- > signedInteger = signed spaceConsumer integer
+-- > signedInteger = L.signed spaceConsumer integer
 
 signed :: (MonadParsec s m Char, Num a) => m () -> m a -> m a
 signed spc p = ($) <$> option id (lexeme spc sign) <*> p