JAL-1807

[jalview.git] / src / com / stevesoft / pat / parsePerl.java

diff --git a/src/com/stevesoft/pat/parsePerl.java b/src/com/stevesoft/pat/parsePerl.java
index 0d1f14e..db842c3 100755 (executable)
--- a/src/com/stevesoft/pat/parsePerl.java
+++ b/src/com/stevesoft/pat/parsePerl.java
@@ -45,10 +45,10 @@ class parsePerl
 
   final public static String codify(String s, boolean keepbs)
   {
-    return codify(s, 0, s.length(), keepbs);
+    return codifyRange(s, 0, s.length(), keepbs);
   }
 
-  final public static String codify(String s, int i0, int iN, boolean keepbs)
+  final public static String codifyRange(String s, int i0, int iN, boolean keepbs)
   {
     StringBuffer sb = new StringBuffer();
     boolean ucmode = false, lcmode = false, litmode = false;
@@ -133,12 +133,12 @@ class parsePerl
 
   final static char uc(char c)
   {
-    return CaseMgr.toUpperCase(c);
+    return CaseMgr.toUpperCaseC(c);
   }
 
   final static char lc(char c)
   {
-    return CaseMgr.toLowerCase(c);
+    return CaseMgr.toLowerCaseC(c);
   }
 
   final static boolean needbs(char c)
@@ -303,7 +303,7 @@ class parsePerl
         return null;
       }
     }
-    Regex r = new Regex();
+    Regex r = new Regex(null, "");
     try
     {
       String pat = s1.toString(), reprul = s2.toString();