about summary refs log tree commit diff
diff options
context:
space:
mode:
authorMorgan Astra <m@morganastra.me>2018-11-14 12:48:47 -0800
committerMorgan Astra <m@morganastra.me>2018-11-14 12:48:47 -0800
commit05a2d8fcff181a09ca7f79ad7590dab24575ab0d (patch)
treebf743fb7e0e0b87e54251caf0731d0b1edd8a523
parent788bfa8cd7a759aa531786abdd05274520154a99 (diff)
Fix docstrings
-rw-r--r--src/pronouns/util.clj8
1 files changed, 5 insertions, 3 deletions
diff --git a/src/pronouns/util.clj b/src/pronouns/util.clj
index 3db3c35..01571b6 100644
--- a/src/pronouns/util.clj
+++ b/src/pronouns/util.clj
@@ -19,8 +19,9 @@
 
 (defn print-and-return "for debugging" [x] (println x) x)
 
-(defn slurp-tabfile [path]
-  "read a tabfile from a filesystem <path> as a table"
+(defn slurp-tabfile
+  "Read a tabfile from a filesystem <path> as a table"
+  [path]
   (let [lines (s/split (slurp path) #"\n")]
     (map #(s/split % #"\t") lines)))
 
@@ -98,10 +99,11 @@
   [table]
   (map (partial shortest-unambiguous-path table) table))
 
-(defn vec-coerce [x]
+(defn vec-coerce
   "wrap a value <x> in a vector if it is not already in one. note that if
   <x> is already in a sequence for which vector? is false, this will add
   another layer of nesting."
+  [x]
   (if (vector? x) x [x]))
 
 (defn strip-markup [form]