 
 (defn parse-defn-or-macro
   [form]
-  (let [fn-or-macro ({'defn "function" 'defmacro "macro"} (first form))
+  (let [type- ({'defn "function" 'defmacro "macro"} (first form))
         args (drop 2 form)
         docstring (let [ds (first args)]
                     (when (string? ds)

      {:expected-docs expected-docs
       :docstring (fix-docstring docstring)
       :signatures signatures
       :fn-or-macro fn-or-macro})))

(defn parse-def-fn
  [form]

  (join "\n"
    (keep identity
      [(cljsdoc-section "Name" (:full-name item))
       (cljsdoc-section "Type" (:type item))
       (cljsdoc-section "Return Type" (:return-type item))
       (cljsdoc-section "Docstring" (:docstring item))
       (cljsdoc-section "Signature" (join "\n" (:signatures item)))
