freebsd-ports/mail/spamoracle/files/patch-wordsplit.mlp

--- wordsplit.mlp.orig	Sat Mar 13 06:52:19 2004
+++ wordsplit.mlp	Sat Mar 13 06:55:09 2004
@@ -35,10 +35,10 @@
 aaaaaaeceeeeiiii\
 <20>nooooo<6F>ouuuuypy"
 
-let normalize s =
-  for i = 0 to String.length s - 1 do
+let normalize s = s
+  (* for i = 0 to String.length s - 1 do
     s.[i] <- tbl.[Char.code s.[i]]
-  done
+  done *)
 
 let all_uppercase s =
   try
@@ -87,6 +87,10 @@
 #ifdef PORTUGUESE
    '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>'
    '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>'
+#endif
+#ifdef RUSSIAN
+  '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>'
+  '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>' '<27>'
 #endif
 ]