summaryrefslogtreecommitdiff
path: root/src/bin/transcriptor.ml
diff options
context:
space:
mode:
authorSébastien Dailly <sebastien@chimrod.com>2021-09-17 02:51:53 +0200
committerSébastien Dailly <sebastien@chimrod.com>2021-09-17 02:51:53 +0200
commit21d05774e5f78b6d070d69f714873b2c2a7cfe28 (patch)
tree808c5658848190f4f96469bef7dcc8a97b1755ed /src/bin/transcriptor.ml
parentc0307751756fd1386d2c82c7a46ff1e2030813f9 (diff)
Separation between font and tengwar
Diffstat (limited to 'src/bin/transcriptor.ml')
-rw-r--r--src/bin/transcriptor.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/bin/transcriptor.ml b/src/bin/transcriptor.ml
index feb24db..d759452 100644
--- a/src/bin/transcriptor.ml
+++ b/src/bin/transcriptor.ml
@@ -14,7 +14,7 @@ let process (optional_line : string option) =
| Ok response -> print_endline response
| Error err -> print_endline err in
let res2 = Result.map
- (fun t-> Sounds.repr (module Repr.Tengwar) t)
+ (fun t-> Sounds.repr (module Repr.Anatar) t)
result in
let () = match res2 with
| Ok response -> print_endline response