From b77d7c60a0323ad9caac8cc19eb2ec0d1e324b09 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Mon, 28 Jan 2013 14:27:04 +0000
Subject: [PATCH] capitals in Fre character matching

---
 lib/src/french/PhonoFre.gf | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lib/src/french/PhonoFre.gf b/lib/src/french/PhonoFre.gf
index f2ef797fc..7ba88e958 100644
--- a/lib/src/french/PhonoFre.gf
+++ b/lib/src/french/PhonoFre.gf
@@ -6,7 +6,10 @@ oper
   voyelle : Strs = strs {
     "a" ; "à" ; "â" ; "e" ; "é" ; "è" ; "ê¨" ; 
     "h" ; 
-    "i" ; "î" ; "o" ; "ô" ; "u" ; "û" ; "y"
+    "i" ; "î" ; "o" ; "ô" ; "u" ; "û" ; "y" ;
+    "A" ; "À" ; "Â" ; "E" ; "É" ; "È" ; "ʨ" ; 
+    "H" ; 
+    "I" ; "Î" ; "O" ; "Ô" ; "U" ; "Û" ; "Y"
     } ;
 
   elision : Str -> Str = \d -> d + pre {"e" ; "'" / voyelle} ;