http://d.hatena.ne.jp/trotr/20100328 昨日のは無駄な再実装をしていた。 zip-filterあたりを使えば良かったようです。t (require '[clojure.zip :as z]) (require '[clojure.contrib.zip-filter :as zf]) (require '[clojure.contrib.zip-filter.xml :as zfx]) (require '[clojure.xml :as x]) (defn describe-weather [area-name] (let [url (format "http://www.google.com/ig/api?weather=%s" area-name) zip-xml (z/xml-zip (x/parse url)) conditions (zfx/x