haspirater

commit b0ec930ea972671db749ceb72386ef8f07f3b1be
parent 18c8b496007ea51a05a0ef2ce03e436016552de4
Author: Antoine Amarilli <a3nm@a3nm.net>
Date:   Mon, 30 May 2011 15:25:50 -0400

add que/qu' to detect.pl

Diffstat:
detect.pl
 | 
2
++

1 file changed, 2 insertions(+), 0 deletions(-)
diff --git a/detect.pl b/detect.pl
@@ -14,6 +14,8 @@ while (<>) {
   # we store in asp what the current word indicates about the next word
   $asp = -1; # default is unknown
   $asp = 0 if /^[lj]'$/;
+  $asp = 0 if /^qu'$/;
+  $asp = 1 if /^que$/;
   $asp = 0 if /^cet$/;
   $asp = 1 if /^ce$/;
   # only meaningful are "je", "de", "le" and "la"