イキオイでquicksilverならぬclojure-silver.cljをば。 (use 'clojure.contrib.duck-streams 'clojure.contrib.str-utils 'clojure.contrib.shell-out) ;clojureでquicksilver的なもの ;ひとつだけだったら起動。複数だったら候補を表示して終了 (defn get-a…

というかケツにnilがいっぱいついてたので書きなおした。countとるとたいへんなことが起きたので。 (use 'clojure.contrib.duck-streams) (defn apps [] (letfn [(gap [lst] (lazy-seq (if-let [l (first lst)] (cons l (gap (rest lst))) )))] (filter #(re…