diff --git a/OpenAFP-Utils.cabal b/OpenAFP-Utils.cabal
--- a/OpenAFP-Utils.cabal
+++ b/OpenAFP-Utils.cabal
@@ -1,5 +1,5 @@
 Name:               OpenAFP-Utils
-Version:            1.3.1
+Version:            1.3.1.1
 License:            PublicDomain
 License-file:       LICENSE
 Author:             Audrey Tang
@@ -12,26 +12,26 @@
 
 Executable afp2line2pdf
     Main-is:            afp2line2pdf.hs
-    Build-depends:      OpenAFP >= 1.3, base, line2pdf >= 0.0.7
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5, line2pdf >= 0.0.7, bytestring
     Extensions:         StandaloneDeriving, GeneralizedNewtypeDeriving, ImplicitParams,
                         ExistentialQuantification, PatternGuards
 
 Executable afp-olndump
     Main-is:            afp-olndump.hs
-    Build-depends:      OpenAFP >= 1.3, base, bytestring, containers, binary
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5, bytestring, containers, binary
 
 Executable afp-dump
     Main-is:            afp-dump.hs
-    Build-depends:      OpenAFP >= 1.3, base, bytestring, containers, iconv, xhtml
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5, bytestring, containers, iconv, xhtml
     Extensions:         DeriveDataTypeable, PatternGuards
 
 Executable afp-page
     Main-is:            afp-page.hs
-    Build-depends:      OpenAFP >= 1.3, base
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5
 
 Executable afp-replace
     Main-is:            afp-replace.hs
-    Build-depends:      OpenAFP >= 1.3, base
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5
     Extensions:         DeriveDataTypeable, FlexibleContexts, PatternGuards
 
 Executable afp-scanudc
@@ -41,24 +41,24 @@
 
 Executable afp-split
     Main-is:            afp-split.hs
-    Build-depends:      OpenAFP >= 1.3, base
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5
 
 Executable afp-split-scb
     Main-is:            afp-split-scb.hs
-    Build-depends:      OpenAFP >= 1.3, base
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5
 
 Executable afp-split-tcb
     Main-is:            afp-split-tcb.hs
-    Build-depends:      OpenAFP >= 1.3, base, filepath
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5, filepath
     Extensions:         ImplicitParams
 
 Executable afp-type
     Main-is:            afp-type.hs
-    Build-depends:      OpenAFP >= 1.3, base
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5
 
 Executable afp-udcfix
     Main-is:            afp-udcfix.hs
-    Build-depends:      OpenAFP >= 1.3, base, regex-base, regex-posix
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5, regex-base, regex-posix
     Extensions:         DeriveDataTypeable, MultiParamTypeClasses, FlexibleContexts, PatternGuards, RankNTypes
 
 Executable afp-validate
@@ -67,7 +67,7 @@
 
 Executable afp2line
     Main-is:            afp2line.hs
-    Build-depends:      OpenAFP >= 1.3, base
+    Build-depends:      OpenAFP >= 1.3, base >= 4 && < 5, containers
     Extensions:         GeneralizedNewtypeDeriving 
 
 source-repository head
diff --git a/afp2line.hs b/afp2line.hs
--- a/afp2line.hs
+++ b/afp2line.hs
@@ -158,8 +158,8 @@
     curEncoding <- lookupFontEncoding scflId
     cs ..>
         [ _PTX_TRN ... \trn -> do
-            when (ptx_scfl (decodeChunk scfl) == 2) $ do
-                hPrint stderr (ptx_trn trn) 
+            -- when (ptx_scfl (decodeChunk scfl) == 2) $ do
+            --     hPrint stderr (ptx_trn trn) 
             case curEncoding of
                 Just CP37    -> let bstr = packAStr' (ptx_trn trn) in do
                     insertText bstr
@@ -168,7 +168,7 @@
                     insertText bstr
                     modifyIORef _CurrentColumn (+ S.length bstr)
                 Just CP939   -> pack939 (ptx_trn trn) >>= \bstr -> do
-                    C.hPut stderr bstr
+                    -- C.hPut stderr bstr
                     insertText bstr
                     modifyIORef _CurrentColumn (+ S.length bstr)
                 Just CP950   -> let bstr = packBuf (ptx_trn trn) in do