clojure concurency refactoring