From 21d05774e5f78b6d070d69f714873b2c2a7cfe28 Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Fri, 17 Sep 2021 02:51:53 +0200 Subject: Separation between font and tengwar --- src/js/tengwar.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/js/tengwar.ml') diff --git a/src/js/tengwar.ml b/src/js/tengwar.ml index dd37c2d..24b8a3c 100644 --- a/src/js/tengwar.ml +++ b/src/js/tengwar.ml @@ -35,7 +35,7 @@ let main id phon tengwar = El.set_prop El.Prop.value (Jstr.of_string response) phon | Error _err -> () in let res2 = Result.map - (fun t-> Sounds.repr (module Repr.Tengwar) t) + (fun t-> Sounds.repr (module Repr.Anatar) t) transcription in let () = match res2 with | Ok response -> -- cgit v1.2.3