Преглед на файлове

dodge ST3 syntax highlighting issue

Simon Krajewski преди 10 години
родител
ревизия
643e2e4d2f
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      filters.ml

+ 1 - 1
filters.ml

@@ -330,7 +330,7 @@ let captured_vars com e =
 	| Cs | Java ->
 		let cnativearray =
 			match (List.find (fun md -> match md with
-					| TClassDecl ({ cl_path = ["cs" | "java"],"NativeArray" }) -> true
+					| TClassDecl ({ cl_path = ["cs"|"java"],"NativeArray" }) -> true
 					| _ -> false
 				) com.types)
 			with TClassDecl cl -> cl | _ -> assert false