diff --git a/Changelog.md b/Changelog.md
--- a/Changelog.md
+++ b/Changelog.md
@@ -1,3 +1,13 @@
+# 1.3.3
+
+* Added `journalField :: JournalField -> Text`, to view the name of a `JournalField` as `Text`.
+  Thanks to @rickynils.
+* Addressed a deprecation warning from `bytestring`.
+
+# 1.3.2
+
+* Increase the upper-bound of `base`.
+
 # 1.3.1
 
 * Increase the upper-bound of `text` to < 1.3.
diff --git a/libsystemd-journal.cabal b/libsystemd-journal.cabal
--- a/libsystemd-journal.cabal
+++ b/libsystemd-journal.cabal
@@ -1,5 +1,5 @@
 name:                libsystemd-journal
-version:             1.3.1
+version:             1.3.3
 synopsis:            Haskell bindings to libsystemd-journal
 homepage:            http://github.com/ocharles/libsystemd-journal
 license:             BSD3
@@ -16,7 +16,7 @@
 
 library
   exposed-modules:     Systemd.Journal
-  build-depends:       base >=4.6 && <4.8, bytestring >= 0.9.1, pipes >= 4.0, pipes-safe >= 2.0, text >= 0.1 && < 1.3, transformers >= 0.3, unix-bytestring >= 0.3.2 && < 0.4, vector >= 0.4 && < 0.11, uuid, unordered-containers >= 0.1 && < 0.3, hashable >= 1.1.2.5, hsyslog, uniplate >= 1.6
+  build-depends:       base >=4.6 && <4.9, bytestring >= 0.9.1, pipes >= 4.0, pipes-safe >= 2.0, text >= 0.1 && < 1.3, transformers >= 0.3, unix-bytestring >= 0.3.2 && < 0.4, vector >= 0.4 && < 0.11, uuid, unordered-containers >= 0.1 && < 0.3, hashable >= 1.1.2.5, hsyslog, uniplate >= 1.6
   hs-source-dirs:      src
   default-language:    Haskell2010
   pkgconfig-depends: libsystemd >= 209
diff --git a/src/Systemd/Journal.hsc b/src/Systemd/Journal.hsc
--- a/src/Systemd/Journal.hsc
+++ b/src/Systemd/Journal.hsc
@@ -28,6 +28,7 @@
       -- ** Custom journal fields
     , JournalField
     , mkJournalField
+    , journalField
 
       -- * Reading the journal
     , openJournal
@@ -88,6 +89,11 @@
 mkJournalField = JournalField . Text.toUpper
 
 --------------------------------------------------------------------------------
+-- | Extract the name of a 'JournalField'.
+journalField :: JournalField -> Text.Text
+journalField (JournalField f) = f
+
+--------------------------------------------------------------------------------
 -- | A structured object of all the fields in an entry in the journal. You
 -- generally don't construct this yourself, but you use the monoid instance and
 -- smart constructors below.
@@ -371,7 +377,7 @@
           case field of
             Just f ->
               let (fieldName, fieldValue) =
-                    BS.breakByte (fromIntegral $ ord '=') f
+                    BS.break (== (fromIntegral $ ord '=')) f
               in readFields
                    (HashMap.insert
                       (JournalField $ Text.decodeUtf8 fieldName)