@@ -294,19 +294,22 @@ lexMacro = do
294 char '.' <|> char '\''
294 char '.' <|> char '\''
295 many spacetab
295 many spacetab
296 macroName <- many (satisfy (not . isSpace))
296 macroName <- many (satisfy (not . isSpace))
297+ if macroName == "nop"
297− args <- lexArgs
300+ args <- lexArgs
299− case macroName of
302+ case macroName of
300− "" -> return mempty
303+ "" -> return mempty
301− "\\\"" -> return mempty
304+ "\\\"" -> return mempty
302− "\\#" -> return mempty
305+ "\\#" -> return mempty
303− "de" -> lexMacroDef args
306+ "de" -> lexMacroDef args
304− "de1" -> lexMacroDef args
307+ "de1" -> lexMacroDef args
305− "ds" -> lexStringDef args
308+ "ds" -> lexStringDef args
306− "ds1" -> lexStringDef args
309+ "ds1" -> lexStringDef args
307− "sp" -> return $ singleTok MEmptyLine
310+ "sp" -> return $ singleTok MEmptyLine
308− "so" -> lexIncludeFile args
311+ "so" -> lexIncludeFile args
309− _ -> resolveMacro macroName args pos
312+ _ -> resolveMacro macroName args pos
312lexIncludeFile :: PandocMonad m => [Arg] -> ManLexer m ManTokens
315lexIncludeFile :: PandocMonad m => [Arg] -> ManLexer m ManTokens