--- lcSjis.c	Thu Jan 18 04:41:56 2001
+++ lcSjis.c	Tue Mar 19 00:44:05 2002
@@ -987,10 +987,20 @@
 		continue;
 	    }
 
-	if (charset->side == XlcGR)
+	if (charset->side == XlcGR) {
 	    ct_state.GR_charset = charset;
-	else if (charset->side == XlcGL)
+	    ct_state.GL_charset = NULL;
+	} else if (charset->side == XlcGL) {
 	    ct_state.GL_charset = charset;
+	    ct_state.GR_charset = NULL;
+	}
+
+	if (charset->side == XlcGR) {
+	    clen = charset->length;
+	    do {
+		(*(Uchar *)(ctptr-clen)) = BIT8ON(*(Uchar *)(ctptr-clen));
+	    } while (--clen); 
+	}
     }
 
     *to = (XPointer)ctptr;