(- fix) Include non-.bs-prefixed .mjs in supported extensions

ELLIOTTCABLE · ELLIOTTCABLE · commit 5922304fa692 · 2020-04-10T03:33:16.000-05:00
diff --git a/jscomp/bsb/bsb_package_specs.ml b/jscomp/bsb/bsb_package_specs.ml
@@ -72,7 +72,7 @@ let bad_suffix_message_warn suffix =
 
 
 let supported_suffix (x : string) =
-  if not (List.mem x Literals.[ suffix_js; suffix_bs_js; suffix_bs_mjs ]) then
+  if not (List.mem x Literals.[ suffix_js; suffix_mjs; suffix_bs_js; suffix_bs_mjs ]) then
     bad_suffix_message_warn x;
   x
 
diff --git a/lib/4.06.1/bsb.ml b/lib/4.06.1/bsb.ml
@@ -7084,7 +7084,7 @@ let bad_suffix_message_warn suffix =
 
 
 let supported_suffix (x : string) =
-  if not (List.mem x Literals.[ suffix_js; suffix_bs_js; suffix_bs_mjs ]) then
+  if not (List.mem x Literals.[ suffix_js; suffix_mjs; suffix_bs_js; suffix_bs_mjs ]) then
     bad_suffix_message_warn x;
   x
 
diff --git a/lib/4.06.1/unstable/bsb_native.ml b/lib/4.06.1/unstable/bsb_native.ml
@@ -7084,7 +7084,7 @@ let bad_suffix_message_warn suffix =
 
 
 let supported_suffix (x : string) =
-  if not (List.mem x Literals.[ suffix_js; suffix_bs_js; suffix_bs_mjs ]) then
+  if not (List.mem x Literals.[ suffix_js; suffix_mjs; suffix_bs_js; suffix_bs_mjs ]) then
     bad_suffix_message_warn x;
   x
 

Original file line number	Diff line number	Diff line change
`@@ -72,7 +72,7 @@ let bad_suffix_message_warn suffix =`
`72`	`72`
`73`	`73`
`74`	`74`	`let supported_suffix (x : string) =`
`75`		`- if not (List.mem x Literals.[ suffix_js; suffix_bs_js; suffix_bs_mjs ]) then`
	`75`	`+ if not (List.mem x Literals.[ suffix_js; suffix_mjs; suffix_bs_js; suffix_bs_mjs ]) then`
`76`	`76`	`bad_suffix_message_warn x;`
`77`	`77`	`x`
`78`	`78`
Original file line number	Diff line number	Diff line change
`@@ -7084,7 +7084,7 @@ let bad_suffix_message_warn suffix =`
`7084`	`7084`
`7085`	`7085`
`7086`	`7086`	`let supported_suffix (x : string) =`
`7087`		`- if not (List.mem x Literals.[ suffix_js; suffix_bs_js; suffix_bs_mjs ]) then`
	`7087`	`+ if not (List.mem x Literals.[ suffix_js; suffix_mjs; suffix_bs_js; suffix_bs_mjs ]) then`
`7088`	`7088`	`bad_suffix_message_warn x;`
`7089`	`7089`	`x`
`7090`	`7090`