Fix old ref to typeof prior to inclusion in core and remove old docs …

…code
dgrnbrg · May 3, 2013 · 4755d20 · 4755d20
1 parent 6b6bbf5
commit 4755d20
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 11 deletions.
diff --git a/examples/piplin/seven_segment_decoder.clj b/examples/piplin/seven_segment_decoder.clj
@@ -3,8 +3,7 @@
   (:use [slingshot.slingshot :only [throw+]])
   (:refer-clojure :as clj :exclude [not= bit-or cond bit-xor + - * bit-and assoc assoc-in inc dec bit-not condp < > <= >= = cast not and or bit-shift-left bit-shift-right pos? neg? zero?])
   (:use plumbing.core
-        [piplin core
-         [protocols :only [typeof]]]))
+        [piplin core]))
 
 (defn log16
   "log base 16"

diff --git a/src/piplin/docs.clj b/src/piplin/docs.clj
@@ -38,15 +38,6 @@
   (println (remove :line (apply get-var-info var-syms)))
   (str "## " title "\n"
        (->> (apply get-var-info var-syms)
-            (map (fn [{:keys [ns name] :as r}]
-                   (cond
-                     (and (= ns 'piplin.protocols)
-                          (= name 'typeof))
-                     (assoc r :file "piplin/protocols.clj" :line 5)
-                     :else
-                     r
-                     )
-                   ))
             (mapcat (fnk [{arglists []} ns name {doc ""} line file]
                          (let [anchor (gensym)]
                            `(~(str "### <a href='https://github.com/dgrnbrg/piplin/blob/" my-rev "/src/" file "#L" line "'>" (escape ns) "/" (escape name)  "</a>")