Removed examplep specific stuff in LaTeX reader.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@826 788f1e2b-df1e-0410-8736-df70ead52e1b

1 files changed, 1 insertions, 13 deletions

diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index fe46d2e4f..d76a4b2ac 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -527,25 +527,13 @@ gt = try (do
   string "\\textgreater"
   return (Str ">"))
 
-code = code1 <|> code2
-
-code1 = try (do 
+code = try (do 
   string "\\verb"
   marker <- anyChar
   result <- manyTill anyChar (char marker)
   let result' = removeLeadingTrailingSpace result
   return (Code result'))
 
--- examplep package uses \Q{} with backslash-escaped symbols
-code2 = try (do
-  string "\\Q{"
-  result <- manyTill (alphaNum <|>
-                      try (do{char '\\'; oneOf "XSVB"; return ' '}) <|>
-                      try (do{string "\\n"; return '\n'}) <|>
-                      try (do{char '\\'; anyChar})) (char '}')
-  let result' = removeLeadingTrailingSpace result
-  return (Code result'))
-
 emph = try (do 
   oneOfStrings [ "\\emph{", "\\textit{" ]
   result <- manyTill inline (char '}')