diff --git a/ChangeLog b/ChangeLog
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+# 1.4.2
+
+* No functional changes; cleaned up deprecation warnings and built on GHC 7.8.2.
+
 # 1.4.1
 
 * Support fonts used by FEIB.
diff --git a/OpenAFP.cabal b/OpenAFP.cabal
--- a/OpenAFP.cabal
+++ b/OpenAFP.cabal
@@ -1,10 +1,10 @@
 name:               OpenAFP
-version:            1.4.1
+version:            1.4.2
 license:            PublicDomain
 License-file:       LICENSE
 cabal-version:      >= 1.6
 author:             Audrey Tang
-Tested-With:        GHC==6.10.1, GHC==6.12.1, GHC==7.0.1, GHC==7.2.1, GHC==7.4.1
+Tested-With:        GHC==6.10.1, GHC==6.12.1, GHC==7.0.1, GHC==7.2.1, GHC==7.4.1, GHC==7.8.2
 maintainer:         audreyt@audreyt.org
 homepage:           https://github.com/audreyt/openafp/
 synopsis:           IBM AFP document format parser and generator
@@ -15,7 +15,7 @@
 
 library
     build-depends:      base >= 2 && < 5, mtl, regex-compat, directory, process,
-                        array, containers, binary, bytestring, hashtables, hashable
+                        array, containers, binary >= 0.7.0.0, bytestring, hashtables, hashable
     hs-source-dirs:     src
     ghc-options:        -funbox-strict-fields -fno-warn-missing-signatures
     extensions:         MagicHash, DeriveDataTypeable, GeneralizedNewtypeDeriving,
diff --git a/src/OpenAFP/Internals.hs b/src/OpenAFP/Internals.hs
--- a/src/OpenAFP/Internals.hs
+++ b/src/OpenAFP/Internals.hs
@@ -51,7 +51,7 @@
 import Foreign.ForeignPtr        as X 
 import Foreign.Storable          as X 
 import Numeric                   as X 
-import System.Cmd                as X 
+import System.Process            as X 
 import System.Console.GetOpt     as X 
 import System.IO                 as X 
 import System.Environment        as X 
diff --git a/src/OpenAFP/Internals/Binary.hs b/src/OpenAFP/Internals/Binary.hs
--- a/src/OpenAFP/Internals/Binary.hs
+++ b/src/OpenAFP/Internals/Binary.hs
@@ -86,6 +86,7 @@
     x * _           = x
     abs x           = x
     signum x        = x
+    negate x        = x
     fromInteger _   = N0
 
 instance Show N1 where show = zeropad 1
@@ -223,7 +224,7 @@
 shiftr_w32 (W32# w) (I# i) = W32# (w `uncheckedShiftRL#`   i)
 
 readN :: Int -> (S.ByteString -> a) -> Get a
-readN n f = fmap f $ getBytes n
+readN n f = fmap f $ getByteString n
 {-# INLINE readN #-}
 -- ^ important
 
