Save and load images using JMagick and Clojure

imageio.clj

(import '[magick MagickImage ImageInfo ColorspaceType])

(defn spit-image [file-name width height data]
  "Save an RGB image"
  (let [info  (ImageInfo.)
        image (MagickImage.)]
    (.constituteImage image width height "RGB" data)
    (.setSize info (str width \x height))
    (.setDepth info 8)
    (.setColorspace info ColorspaceType/RGBColorspace)
    (.setFileName image file-name)
    (.writeImage image info)
    image))

(defn slurp-image [file-name]
  "Load an RGB image"
  (let [info      (ImageInfo. file-name)
        image     (MagickImage. info)
        dimension (.getDimension image)]
    (.setDepth info 8)
    (.setColorspace info ColorspaceType/RGBColorspace)
    (.setMagick info "RGB")
    [(.width dimension) (.height dimension) (.imageToBlob image info)]))