From: ntakahas <ntakahas>
Date: Wed, 8 Oct 2008 09:11:02 +0000 (+0000)
Subject: Move 'pres' from Stage 6 to Stage 4.
X-Git-Tag: REL-1-5-3~9
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=fb1395b0cfa5a0e431fa3d9f51a46756ff86e2aa;p=m17n%2Fm17n-db.git

Move 'pres' from Stage 6 to Stage 4.
---

diff --git a/FLT/MLYM-OTF.flt b/FLT/MLYM-OTF.flt
index 15c7235..e6c1d6b 100644
--- a/FLT/MLYM-OTF.flt
+++ b/FLT/MLYM-OTF.flt
@@ -154,16 +154,17 @@
   *))
 
 ;; Stage 4
-;; Apply other language forms.
+;; Apply other language forms and 'pres'.
 (generator
  (0
   (cond
    ;; All characters should have the 'half' form glyph, and 'pstf' is
-   ;; always applied after 'half'.  Thus we do not need to worry
-   ;; about applying 'pstf' to the first glyph.
+   ;; always applied after 'half'.  Thus we do not need to worry about
+   ;; applying 'pstf' to the first glyph.  Also 'pres' is applied here
+   ;; to form pre-base conjuncts.
    ;; 1   2       3
    (" (m)?([^Z ]*)(Z[^ ]*) "
-    | (1 = *) (2 otf:mlym=half,pstf+) (3 = *) |)
+    | (1 = *) (2 otf:mlym=half,pstf,pres+) (3 = *) |)
 
    ;; Explicit Halant.
    (" ([CP]H)N "
@@ -193,12 +194,12 @@
   *))
 
 ;; Stage 6
-;; Apply typographical forms, 'haln' and GPOS features.
+;; Apply remaining typographical forms, 'haln' and GPOS features.
 (generator
  (0
   (cond
    (" ([^ ]+) "
-    (1 otf:mlym=pres,abvs,blws,psts,haln+abvm,blwm,dist))
+    (1 otf:mlym=abvs,blws,psts,haln+abvm,blwm,dist))
    ("."
     [ = ]))
   *))