--- gs_init.ps.orig	Tue Feb  1 09:29:08 2000
+++ gs_init.ps	Tue Feb  1 09:34:09 2000
@@ -73,7 +73,7 @@
 systemdict /.languagelevel known not { /.languagelevel 1 def } if
 
 % Optionally choose a default paper size other than U.S. letter.
-% (a4) /PAPERSIZE where { pop pop } { /PAPERSIZE exch def } ifelse
+(a4) /PAPERSIZE where { pop pop } { /PAPERSIZE exch def } ifelse
 
 % Turn on array packing for the rest of initialization.
 true setpacking
@@ -1470,3 +1470,24 @@
 (END GC) VMDEBUG
 
 % The interpreter will run the initial procedure (start).
+
+% unofficial patch:
+% make it possible to print from within acroread pdf viewer
+/Default currenthalftone /Halftone defineresource pop
+
+% load initial CID-keyed fonts(Korean. KSC-EUC-H).
+% It should be in Fontmap, but to avoid loading two or more time.
+% (it can stop the interpreter - /rangecheck error)
+%
+QUIET not { (Initializing Korean CID fonts: ) print } if
+% font loading start
+(Munhwa-Regular-KSC-EUC-H.gsf) runlibfile
+QUIET not { (Munhwa-Regular-KSC-EUC-H ) print } if
+(Munhwa-Bold-KSC-EUC-H.gsf) runlibfile
+QUIET not { (Munhwa-Bold-KSC-EUC-H ) print } if
+(MunhwaGothic-Regular-KSC-EUC-H.gsf) runlibfile
+QUIET not { (MunhwaGothic-Regular-KSC-EUC-H ) print } if
+(MunhwaGothic-Bold-KSC-EUC-H.gsf) runlibfile
+QUIET not { (MunhwaGothic-Bold-KSC-EUC-H ) print } if
+% end of font loading
+QUIET not { (\n) print } if