--- ../thotlib/dialogue/font.c	Tue Jul  3 15:23:54 2001
+++ ../thotlib/dialogue/font.c	Sun Nov  4 18:45:47 2001
@@ -769,16 +769,16 @@
 	strcat (r_nameX, "p");
       strcat (r_nameX, "-*-");
       if (TOLOWER (alphabet) == 'l')
-	strcat (r_nameX, "iso8859-1");
+	strcat (r_nameX, "koi8-r");
       else if (TOLOWER (alphabet) == 'e' || alphabet == '2')
-	strcat (r_nameX, "iso8859-2");
+	strcat (r_nameX, "koi8-r");
       else if (TOLOWER (alphabet) == 'g')
 	strcat (r_nameX, "*-fontspecific");	/*adobe */
       else
 	{
-	  strcat (r_nameX, "iso8859-1");
+	  strcat (r_nameX, "koi8-r");
 	  /* replace '1' by current alphabet */
-	  r_nameX[strlen (r_nameX) -1] = alphabet;
+	  /* r_nameX[strlen (r_nameX) -1] = alphabet; */
 	}
     }