From 8b7e1b8219206982180a1075085ae0cf29cb460e Mon Sep 17 00:00:00 2001
From: handa <handa>
Date: Thu, 13 Dec 2007 08:11:08 +0000
Subject: [PATCH] Use U+25CC (DOTTED CIRCLE) if the font has it.

---
 FLT/THAI-GENERIC.flt |    4 ++--
 FLT/THAI-NORASI.flt  |    7 ++++---
 2 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/FLT/THAI-GENERIC.flt b/FLT/THAI-GENERIC.flt
index d994d80..15d4426 100644
--- a/FLT/THAI-GENERIC.flt
+++ b/FLT/THAI-GENERIC.flt
@@ -48,8 +48,8 @@
     < (1 = *) (2 (cond ("v" =) ("." Br<8Bl =))) (3 tr+<8bl =) > )
    ("(d)([vV])?(T)?"
     < (1 = *) (2 (cond ("v" br-tl =) ("." =))) (3 tr+bl =) > )
-   ("[VvTA]"
-    [ = ])
+   ("[VvT]"
+    (cond ((font-facility 0x25CC) < 0x25CC = > ) ("." [ = ] )))
    ("."
     =))
   *))
diff --git a/FLT/THAI-NORASI.flt b/FLT/THAI-NORASI.flt
index 6826c03..2bb175e 100644
--- a/FLT/THAI-NORASI.flt
+++ b/FLT/THAI-NORASI.flt
@@ -39,7 +39,7 @@
    ("(C)(V)?(T)?"
     (1 =) (2 =) (3 =))
    ("[^C]"
-    [ = ]))
+    =))
   *))
 
 (category
@@ -62,7 +62,8 @@
  (0x0E38 0x0E3A	?v)
  (0x0E47	?V)
  (0x0E48 0x0E4C	?T)
- (0x0E4D 0x0E4E	?V))
+ (0x0E4D 0x0E4E	?V)
+ (0x25CC	?E))
 
 (generator
  (0
@@ -78,7 +79,7 @@
    ("(d)(v)?(T)?"
     < (1 =) (2 vowel-deep) (3 tone-low) >)
    ("[VvT]"
-    [ = ])
+    (cond ((font-facility 0x25CC) < 0x25CC = > ) ("." [ = ] )))
    ("."
     =))
   *)
-- 
1.7.10.4