summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--.dir-locals.el4
-rw-r--r--dev/user.clj7
-rw-r--r--src/example_song.clj11
3 files changed, 10 insertions, 12 deletions
diff --git a/.dir-locals.el b/.dir-locals.el
index 7a7533d..e2b221a 100644
--- a/.dir-locals.el
+++ b/.dir-locals.el
@@ -1,2 +1,4 @@
((nil
- (cider-clojure-cli-global-options . "-A:dev -J-Djdk.attach.allowAttachSelf")))
+ (cider-clojure-cli-aliases . ":dev")
+ (cider-clojure-cli-parameters . "-J-Djdk.attach.allowAttachSelf")
+ (cider-repl-init-code . ("(dev)"))))
diff --git a/dev/user.clj b/dev/user.clj
new file mode 100644
index 0000000..4a42f1d
--- /dev/null
+++ b/dev/user.clj
@@ -0,0 +1,7 @@
+(ns user)
+
+(defn dev
+ "This function is called automatically at repl connection time."
+ []
+ (require '[clojure.repl])
+ (intern 'clojure.core 'doc #'clojure.repl/doc))
diff --git a/src/example_song.clj b/src/example_song.clj
deleted file mode 100644
index 096c686..0000000
--- a/src/example_song.clj
+++ /dev/null
@@ -1,11 +0,0 @@
-(ns example-song
- (:require [missionary.core :as m]
- [notation :refer [note poly group]]))
-
-(defn melody [clock]
- (m/signal
- (group clock 0 2
- (poly (note clock 0 4 1)
- (note clock 0 5 3)
- (note clock 0 3 5)
- (note clock 2 1 7)))))