# HG changeset patch
# User wenzelm
# Date 1647024274 -3600
# Node ID 70837c079b2063fbec593a65e38f9c6ff7ab5442
# Parent  6369151119ee973b83a5a7bb5fb5edecbf5deec1
suppress OCaml icons: avoid conflict of .ml and .ML, due to case-insensitive file-names in VSCode;

diff -r 6369151119ee -r 70837c079b20 src/Tools/VSCode/patches/no_ocaml_icons.patch
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/Tools/VSCode/patches/no_ocaml_icons.patch	Fri Mar 11 19:44:34 2022 +0100
@@ -0,0 +1,68 @@
+diff --git a/extensions/theme-seti/build/update-icon-theme.js b/extensions/theme-seti/build/update-icon-theme.js
+--- a/extensions/theme-seti/build/update-icon-theme.js
++++ b/extensions/theme-seti/build/update-icon-theme.js
+@@ -29,7 +29,6 @@ const nonBuiltInLanguages = { // { fileNames, extensions  }
+ 	"kotlin": { extensions: ['kt'] },
+ 	"mustache": { extensions: ['mustache', 'mst', 'mu', 'stache'] },
+ 	"nunjucks": { extensions: ['nunjucks', 'nunjs', 'nunj', 'nj', 'njk', 'tmpl', 'tpl'] },
+-	"ocaml": { extensions: ['ml', 'mli', 'mll', 'mly', 'eliom', 'eliomi'] },
+ 	"puppet": { extensions: ['puppet'] },
+ 	"r": { extensions: ['r', 'rhistory', 'rprofile', 'rt'] },
+ 	"rescript": { extensions: ['res', 'resi'] },
+diff --git a/extensions/theme-seti/icons/vs-seti-icon-theme.json b/extensions/theme-seti/icons/vs-seti-icon-theme.json
+index 72f3c989c2a..0f6a7dbf879 100644
+--- a/extensions/theme-seti/icons/vs-seti-icon-theme.json
++++ b/extensions/theme-seti/icons/vs-seti-icon-theme.json
+@@ -1006,14 +1006,6 @@
+ 			"fontCharacter": "\\E069",
+ 			"fontColor": "#8dc149"
+ 		},
+-		"_ocaml_light": {
+-			"fontCharacter": "\\E06A",
+-			"fontColor": "#cc6d2e"
+-		},
+-		"_ocaml": {
+-			"fontCharacter": "\\E06A",
+-			"fontColor": "#e37933"
+-		},
+ 		"_odata_light": {
+ 			"fontCharacter": "\\E06B",
+ 			"fontColor": "#cc6d2e"
+@@ -1645,10 +1637,6 @@
+ 		"npm-debug.log": "_npm",
+ 		"npmignore": "_npm_1",
+ 		"npmrc": "_npm_1",
+-		"ml": "_ocaml",
+-		"mli": "_ocaml",
+-		"cmx": "_ocaml",
+-		"cmxa": "_ocaml",
+ 		"odata": "_odata",
+ 		"php.inc": "_php",
+ 		"pipeline": "_pipeline",
+@@ -1908,7 +1896,6 @@
+ 		"kotlin": "_kotlin",
+ 		"mustache": "_mustache",
+ 		"nunjucks": "_nunjucks",
+-		"ocaml": "_ocaml",
+ 		"rescript": "_rescript",
+ 		"sass": "_sass",
+ 		"stylus": "_stylus",
+@@ -2027,10 +2014,6 @@
+ 			"npm-debug.log": "_npm_light",
+ 			"npmignore": "_npm_1_light",
+ 			"npmrc": "_npm_1_light",
+-			"ml": "_ocaml_light",
+-			"mli": "_ocaml_light",
+-			"cmx": "_ocaml_light",
+-			"cmxa": "_ocaml_light",
+ 			"odata": "_odata_light",
+ 			"php.inc": "_php_light",
+ 			"pipeline": "_pipeline_light",
+@@ -2224,7 +2207,6 @@
+ 			"kotlin": "_kotlin_light",
+ 			"mustache": "_mustache_light",
+ 			"nunjucks": "_nunjucks_light",
+-			"ocaml": "_ocaml_light",
+ 			"rescript": "_rescript_light",
+ 			"sass": "_sass_light",
+ 			"stylus": "_stylus_light",
diff -r 6369151119ee -r 70837c079b20 src/Tools/VSCode/src/build_vscodium.scala
--- a/src/Tools/VSCode/src/build_vscodium.scala	Fri Mar 11 14:02:13 2022 +0100
+++ b/src/Tools/VSCode/src/build_vscodium.scala	Fri Mar 11 19:44:34 2022 +0100
@@ -142,7 +142,7 @@
         // explicit patches
         {
           val patches_dir = Path.explode("$ISABELLE_VSCODE_HOME/patches")
-          for (name <- Seq("isabelle_encoding")) {
+          for (name <- Seq("isabelle_encoding", "no_ocaml_icons")) {
             val path = patches_dir + Path.basic(name).patch
             Isabelle_System.bash("patch -p1 < " + File.bash_path(path), cwd = dir.file).check
           }