git.iko.soy/typeable/pandoc
on master help sign in
Parsing: Added isbn and pmid schemes
95fb075Matthew Pickering
src/Text/Pandoc/Parsing.hs+2−2
compare with master
unifiedsplit
@@ -408,7 +408,7 @@ emailAddress = try $ toResult <$> mailbox <*> (char '@' *> domain)
408
408
409
409
410-- Schemes from http://www.iana.org/assignments/uri-schemes.html plus
410-- Schemes from http://www.iana.org/assignments/uri-schemes.html plus
411−-- the unofficial schemes coap, doi, javascript.
411+-- the unofficial schemes coap, doi, javascript, isbn, pmid
412schemes :: [String]
412schemes :: [String]
413schemes = ["coap","doi","javascript","aaa","aaas","about","acap","cap","cid",
413schemes = ["coap","doi","javascript","aaa","aaas","about","acap","cap","cid",
414 "crid","data","dav","dict","dns","file","ftp","geo","go","gopher",
414 "crid","data","dav","dict","dns","file","ftp","geo","go","gopher",
@@ -430,7 +430,7 @@ schemes = ["coap","doi","javascript","aaa","aaas","about","acap","cap","cid",
430 "rtmp","secondlife","sftp","sgn","skype","smb","soldat","spotify",
430 "rtmp","secondlife","sftp","sgn","skype","smb","soldat","spotify",
431 "ssh","steam","svn","teamspeak","things","udp","unreal","ut2004",
431 "ssh","steam","svn","teamspeak","things","udp","unreal","ut2004",
432 "ventrilo","view-source","webcal","wtai","wyciwyg","xfire","xri",
432 "ventrilo","view-source","webcal","wtai","wyciwyg","xfire","xri",
433− "ymsgr"]
433+ "ymsgr", "isbn", "pmid"]
434
434
435uriScheme :: Stream s m Char => ParserT s st m String
435uriScheme :: Stream s m Char => ParserT s st m String
436uriScheme = oneOfStringsCI schemes
436uriScheme = oneOfStringsCI schemes