Make xml-> return empty strings instead of skipping non-matching nodes

clojure-data-zip-xml.clj

(ns test
  (:require [clojure.zip :as zip]
            [clojure.data.xml :as xml]
            [clojure.data.zip.xml :as zx]))

(def xml-example
  "<top>
    <id>
     <desc>
      <other>Something</other>
      <desc>A description</desc>
     </desc>
    </id>
    <id>
     <desc>
      <desc>Another description</desc>
     </desc>
    </id>
   </top>")

(zx/xml-> (zip/xml-zip (xml/parse-str xml-example))
          :top :id :desc :other zx/text)

;; Returns ("Something") while I would like ("Something" "")