suuport .ML for OCaml file

yaohui-wyh · May 11, 2016 · bc09d7f · bc09d7f
1 parent 167d1a0
commit bc09d7f
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 5 deletions.
diff --git a/language.go b/language.go
@@ -120,10 +120,11 @@ var Exts map[string]string = map[string]string{
 	"Matlab":      "Matlab",      // both use ext '.m'
 	"md":          "md",
 	"markdown":    "md",
-	"ml":          "ml",
-	"mli":         "ml",
-	"mll":         "ml",
-	"mly":         "ml",
+	"ML":          "OCaml",
+	"ml":          "OCaml",
+	"mli":         "OCaml",
+	"mll":         "OCaml",
+	"mly":         "OCaml",
 	"mm":          "mm",
 	"maven":       "maven",
 	"makefile":    "makefile",

diff --git a/main.go b/main.go
@@ -207,7 +207,7 @@ func main() {
 		"less":        less,
 		"Objective-C": objective_c,
 		"md":          markdown,
-		"ml":          ocaml,
+		"OCaml":       ocaml,
 		"mm":          objective_cpp,
 		"makefile":    makefile,
 		"Matlab":      matlab,