From eee59e7ed0397c44ae8be834f044fddc6df083e8 Mon Sep 17 00:00:00 2001 From: ntakahas Date: Fri, 24 Aug 2007 06:58:35 +0000 Subject: [PATCH] Specify OTF features explicitly. --- FLT/ARAB-OTF.flt | 30 ++++++++++++------------------ 1 file changed, 12 insertions(+), 18 deletions(-) diff --git a/FLT/ARAB-OTF.flt b/FLT/ARAB-OTF.flt index 71a529d..59b62ea 100644 --- a/FLT/ARAB-OTF.flt +++ b/FLT/ARAB-OTF.flt @@ -133,7 +133,7 @@ ;; (generator ;; (0 -;; otf:arab=ccmp)) +;; otf:arab=ccmp+)) ;; Step 2: Initial, medial, or final. @@ -146,20 +146,20 @@ (cond ("(.)(T*)([DR].*)" < - (1 otf:arab=init) + (1 otf:arab=init+) (2 = *) > (3 join)) ("(.)(T*)(.*)" ; == (D)(T*)(U.*) < - (1 otf:arab=isol) + (1 otf:arab=isol+) (2 = *) > (3 disjoin)))) ("([RU])(T*)(.*)" < - (1 otf:arab=isol) + (1 otf:arab=isol+) (2 = *) > (3 disjoin)) @@ -174,20 +174,20 @@ (cond ("(.)(T*)([DR].*)" < - (1 otf:arab=medi) + (1 otf:arab=medi+) (2 = *) > (3 join)) ("(.)(T*)(.*)" ; == (D)(T*)(U.*) < - (1 otf:arab=fina) + (1 otf:arab=fina+) (2 = *) > (3 disjoin)))) ("(.)(T*)(.*)" < - (1 otf:arab=fina) + (1 otf:arab=fina+) (2 = *) > (3 disjoin)))) @@ -198,35 +198,29 @@ (cond ("(.)(T*)([DR].*)" < - (1 otf:arab=init) + (1 otf:arab=init+) (2 = *) > (3 join)) ("(.)(T*)(.*)" ; == (D)(T*)(U.*) < - (1 otf:arab=isol) + (1 otf:arab=isol+) (2 = *) > (3 disjoin)))) ("(.)(T*)(.*)" ; == ([RU])(T*)(.*) < - (1 otf:arab=isol) + (1 otf:arab=isol+) (2 = *) > (3 disjoin))))) -;; Step 3: Other GSUB features (ligatures, etc.) +;; Step 3: Other OTF features. (generator (0 - otf:arab=rlig,calt,liga,dlig,cswh,mset)) - -;; Step 4: GPOS features. - -(generator - (0 - otf:arab=)) + otf:arab=rlig,calt,liga,dlig,cswh,mset+curs,kern,mark,mkmk)) ;; Local Variables: ;; mode: lisp -- 1.7.10.4