   (:require
     [byte-streams]
     [clojure.java.io :as io]
+    [mvxcvi.crypto.pgp :as pgp]
     [puget.printer :as puget]
     [vault.blob.store :as store]
     [vault.data.edn :as edn]
+    [vault.data.key :as key]
     [vault.tool.blob :refer [enumerate-prefix]]))
 
 

      (when-let [blob (store/get store id)]
        (println (str id))
        (let [content (:content blob)
              data (edn/parse-data blob)]
          ; TODO: interpret PGP keys
          (cond data               (print-edn-blob data)
                (:binary opts)     (print-binary-blob content)
                (textual? content) (print-text-blob content)
                :else              (print-binary-blob content)))

      (println (str \u001b "[7m" \% \u001b "[0m")))))


(defn- print-key-blob
  "Prints a public-key blob info."
  [blob]
  (-> blob :data/values first pgp/key-info puget/cprint))


(defn- print-edn-blob
  "Prints an EDN blob's values."
  [blob]
