Changes for clojure.contrib.generic.collection/into

octopusgrabbus on Thu, 27 Dec 2012
(defn all-files-present?
"Takes a list of real file names, and returns a sequence of maps 
 indicating  the file name and its availability status 1 for 
 present and 0 for not present."
  [file-seq]
  (for [fnam file-seq
        :let [stat-map {(keyword fnam) (if (= (look-for fnam "f") 0)
                                              1
                                              0)}]]
   stat-map))

(into {}  (all-files-present? '("Makefile" "build.sh" "real-estate.csv")) )
{:Makefile 1, :build.sh 1, :real-estate.csv 0}