--- C:\Documents and Settings\carneeki\Desktop\porterstemmer.module.orig	Mon Nov 17 03:33:24 2008
+++ C:\Documents and Settings\carneeki\Desktop\porterstemmer.module	Mon Nov 17 03:59:00 2008
@@ -97,7 +97,8 @@
             // If one of above two test successful
             if (    !replace($word, 'at', 'ate')
                 AND !replace($word, 'bl', 'ble')
-                AND !replace($word, 'iz', 'ize')) {
+                AND !replace($word, 'iz', 'ize')
+                AND !replace($word, 'is', 'ise')) {
 
                 // Double consonant ending
                 if (    doubleConsonant($word)
@@ -154,7 +155,8 @@
             break;
 
         case 'e':
-            replace($word, 'izer', 'ize', 0);
+               replace($word, 'izer', 'ize', 0)
+            OR replace($word, 'iser', 'ise', 0);
             break;
 
         case 'g':
@@ -171,6 +173,7 @@
 
         case 'o':
                replace($word, 'ization', 'ize', 0)
+            OR replace($word, 'isation', 'ise', 0)
             OR replace($word, 'ation', 'ate', 0)
             OR replace($word, 'ator', 'ate', 0);
             break;
@@ -206,7 +209,8 @@
             break;
 
         case 's':
-            replace($word, 'ness', '', 0);
+               replace($word, 'ness', '', 0)
+            OR replace($word, 'alise', 'al');
             break;
 
         case 't':
@@ -277,7 +281,8 @@
             break;
 
         case 's':
-            replace($word, 'ism', '', 1);
+               replace($word, 'ism', '', 1)
+            OR replace($word, 'ise', '', 1);
             break;
 
         case 't':