(let [read-name (let [name outer]
                  (fn [] .name))]
  (read-name))