From af3904ff7dac073ef9be7c519195dc4cdbf84931 Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Thu, 29 Jun 2023 13:53:04 +0100
Subject: [PATCH] First successful rewritten cmap table

---
 cpdftruetype.ml | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/cpdftruetype.ml b/cpdftruetype.ml
index 7b5b7ac..f660c9e 100644
--- a/cpdftruetype.ml
+++ b/cpdftruetype.ml
@@ -473,6 +473,8 @@ let subset_font major minor tables indexToLocFormat subset encoding cmap loca mk
         write_loca_table subset cmap indexToLocFormat bs loca
       else if string_of_tag tag = "glyf" && subset <> [] then
         ignore (write_glyf_table subset cmap bs mk_b glyfoffset loca)
+      else if string_of_tag tag = "cmap" && subset <> [] then
+        ignore (write_cmap_table subset cmap bs)
       else
         match findtag tag with
         | (og_off, Some len) ->