Common subdirectories: hcode2.1/CODE and hcode2.1-mailpatch/CODE
Only in hcode2.1-mailpatch: hcode
diff -U 3 hcode2.1/mail.c hcode2.1-mailpatch/mail.c
--- hcode2.1/mail.c	Sun Sep 18 20:34:11 1994
+++ hcode2.1-mailpatch/mail.c	Tue Apr 23 14:27:08 1996
@@ -58,7 +58,11 @@
 	iptr = ibuf;
 	fgets(ibuf,1024,fpin);
 	while (*iptr) {
-		if (!strncmp("=?B?EUC-KR?",iptr,11)) {
+		if (  !strncmp("=?B?EUC-KR?",iptr,11) ||
+                      !strncmp("=?EUC-KR?B?",iptr,11) ||
+                      !strncmp("=?euc-kr?B?",iptr,11) ||
+                      !strncmp("=?EUC-KR?b?",iptr,11) ||
+                      !strncmp("=?euc-kr?b?",iptr,11) ) {
 			iptr+=11;
         		tptr = tbuf;
                        	while (strncmp("?=",iptr,2)) *tptr++ = *iptr++;
@@ -74,6 +78,9 @@
 			    (*prwc)(outwc,fpout,outCode);
 					
 			}
+/* You may put the routine for replacing 'iso-2022-kr' with 'euc-kr' */
+/* charset header */
+  
 		} else fputc(*iptr++,fpout);
 	}
     } while (ibuf[0]!='\n');
@@ -113,7 +120,7 @@
 			*tptr = NULL;
 			if (tbuf[0]!=NULL) {
 				string_to_base64(obuf, tbuf);
-				fprintf(fpout,"=?B?EUC-KR?%s?=",obuf);
+				fprintf(fpout,"=?EUC-KR?B?%s?=",obuf);
 			}
 		}
 		return;
diff -U 3 hcode2.1/out.c hcode2.1-mailpatch/out.c
--- hcode2.1/out.c	Mon Dec 11 20:35:14 1995
+++ hcode2.1-mailpatch/out.c	Sun Apr  7 12:43:07 1996
@@ -49,7 +49,7 @@
         }
 
         if ( prstat == PRENG && (outCode==IS||outCode==SD) ) {
-		fputs("\033$)C\n",fpout);
+		fputs("\n\033$)C\n",fpout);
 		putc(StartC,fpout);
 	}