git.iko.soy/typeable/pandoc
on master help sign in
Merge pull request #2569 from rgaiacs/add-highlighting-to-gap
b63dc2cJohn MacFarlane
src/Text/Pandoc/Highlighting.hs+2−1
compare with master
unifiedsplit
@@ -124,6 +124,7 @@ langsList = [("ada","Ada")
124 ,("php","PHP")
124 ,("php","PHP")
125 ,("xslt","XSLT")
125 ,("xslt","XSLT")
126 ,("html","HTML")
126 ,("html","HTML")
127+ ,("gap","GAP")
127 ]
128 ]
128
129
129listingsLangs :: [String]
130listingsLangs :: [String]
@@ -138,7 +139,7 @@ listingsLangs = ["Ada","Java","Prolog","Algol","JVMIS","Promela",
138 "Oberon-2","TeX","erlang","OCL","VBScript","Euphoria",
139 "Oberon-2","TeX","erlang","OCL","VBScript","Euphoria",
139 "Octave","Verilog","Fortran","Oz","VHDL","GCL",
140 "Octave","Verilog","Fortran","Oz","VHDL","GCL",
140 "Pascal","VRML","Gnuplot","Perl","XML","Haskell",
141 "Pascal","VRML","Gnuplot","Perl","XML","Haskell",
141− "PHP","XSLT","HTML","PL/I"]
142+ "PHP","XSLT","HTML","PL/I","GAP"]
142
143
143-- Determine listings language name from highlighting-kate language name.
144-- Determine listings language name from highlighting-kate language name.
144toListingsLanguage :: String -> Maybe String
145toListingsLanguage :: String -> Maybe String