   (:require
     byte-streams
     [clojure.java.io :as io]
-    [clojure.string :as string]
+    [clojure.string :as str]
     [mvxcvi.crypto.util :refer [do-bytes hex-str]])
   (:import
     (java.io

         :algorithm (key-algorithm pubkey)
         :fingerprint (->> (.getFingerprint pubkey)
                           (map (partial format "%02X"))
                           string/join)
         :encryption-key? (.isEncryptionKey pubkey)
         :user-ids (-> pubkey .getUserIDs iterator-seq vec)}]
    (if (instance? PGPSecretKey k)

  (let [field->entry
        (fn [^java.lang.reflect.Field f]
          (vector (-> (.getName f)
                      (str/replace \_ \-)
                      .toLowerCase
                      keyword)
                  (.getInt f nil)))]
