From a3bad9ba28cb6cc8a52926bdf930f1440264b828 Mon Sep 17 00:00:00 2001
From: ntakahas <ntakahas>
Date: Mon, 23 Apr 2007 10:58:30 +0000
Subject: [PATCH] BS deletes repaya first rather than the base consonant.

---
 si-wijesekera.mim |   17 ++++++++++++++++-
 1 file changed, 16 insertions(+), 1 deletion(-)

diff --git a/si-wijesekera.mim b/si-wijesekera.mim
index b94fa94..a927553 100644
--- a/si-wijesekera.mim
+++ b/si-wijesekera.mim
@@ -351,7 +351,12 @@ This input method requires surrounding text support.
      0x0D94)
 
     ((& (>= c 0x0D9A) (<= c 0x0DC6) (= @-2 0x0DCA) (= @-1 0x200D))
-     (delete @-2))
+     (cond
+      ((= @-3 0x0DBB)
+       (delete @-3)
+       (insert c))
+      (1
+       (delete @-2))))
 
     ((= c 0x0DD9)
      (cond
@@ -384,6 +389,11 @@ This input method requires surrounding text support.
        (delete @-1)
        0x200C
        0x0DD9)
+      ((& (= @-4 0x0DBB) (= @-3 0x0DCA) (= @-2 0x200D))
+       (set c1 @-1)
+       (delete @-4)
+       (insert c1)
+       0x0DD9)
       ((& (>= @-4 0x0D9A) (<= @-4 0x0DC6) (= @-3 0x0DCA) (= @-2 0x200D))
        (delete @-3)
        0x0DD9)
@@ -402,6 +412,11 @@ This input method requires surrounding text support.
        (delete @-1)
        0x200C
        0x0DDB)
+      ((& (= @-4 0x0DBB) (= @-3 0x0DCA) (= @-2 0x200D))
+       (set c1 @-1)
+       (delete @-4)
+       (insert c1)
+       0x0DDB)
       ((& (>= @-4 0x0D9A) (<= @-4 0x0DC6) (= @-3 0x0DCA) (= @-2 0x200D))
        (delete @-3)
        0x0DDB)
-- 
1.7.10.4