Index: indic-ot.c
===================================================================
RCS file: /cvs/gnome/pango/modules/indic/indic-ot.c,v
retrieving revision 1.2
diff -u -3 -p -r1.2 indic-ot.c
--- indic-ot.c	20 Aug 2002 19:51:37 -0000	1.2
+++ indic-ot.c	1 Jun 2003 04:32:42 -0000
@@ -228,6 +228,7 @@ glong indic_ot_reorder(const gunichar *c
                 glong postBaseLimit = class_table->scriptFlags & SF_POST_BASE_LIMIT_MASK;
                 gboolean seenVattu = false;
                 gboolean seenBelowBaseForm = false;
+                gboolean seenPostBaseForm = false;
                 gboolean supressVattu = true;
                 glong bcSpan;
 
@@ -247,8 +248,10 @@ glong indic_ot_reorder(const gunichar *c
                             if (seenBelowBaseForm) {
                                 break;
                             }
-
-                            postBase = baseConsonant;
+                            if (!seenPostBaseForm) {
+                                 seenPostBaseForm = true;
+                                 postBase = baseConsonant;
+                            }
                         } else if (HAS_BELOW_BASE_FORM(charClass)) {
                             seenBelowBaseForm = true;
                         }
@@ -279,7 +282,7 @@ glong indic_ot_reorder(const gunichar *c
 
                 for (i = baseLimit; i < baseConsonant; i += 1) {
                     gunichar ch = chars[i];
-                    gulong tag = blwf_p;
+                    gulong tag = half_p;
                     IndicOTCharClass charClass = indic_ot_get_char_class(class_table, ch);
 
                     if (IS_CONSONANT(charClass)) {
