todos solution

index.edn

[{:type :input :value
  "(def todos [\"Buy milk\"
            \"Read newspaper\"
            \"Pick up olives\"
            \"1h jog\"])"}
 {:type :input :value
  "(defn todo->str [index todo] (str index \". \" todo \"\\n\"))"}
 {:type :input :value
  "(defn indexes [ts]
  (map inc (range (count ts))))"}
 {:type :input :value
  "(defn todos->str [ts]
  (let [lines (map todo->str (indexes ts) ts)]
    (apply str lines)))"}
 {:type :input :value "(js/alert (todos->str todos))"}
 ]