Adds 2 launch event listeners that spit the created nrepl server port into ~/.nrepl and <project-dir>/.nrepl files

nrepl_events.clj

(ns nrepl-events
  (:require [ccw.core.launch :as l]
            [clojure.java.io :as io]
            [ccw.eclipse     :as e]))

(defn spit-globally
  "global ~/.nrepl file"
  [{:keys [event-type port project]}]
  (when (= :creation event-type)
    (spit (io/file (java.lang.System/getProperty "user.home") ".nrepl")
          (str port))))

(defn spit-per-project
  "per-project .nrepl file, or defaults to globally if no project"
  [{:keys [event-type port project] :as m}]
  (when (and (= :creation event-type) project)
    (spit (io/file (e/project project) ".nrepl")
          (str port))))
  
(swap! l/nrepl-servers-listeners
       assoc
       :spit-globally #'spit-globally
       :spit-per-project #'spit-per-project)