about summary refs log tree commit diff stats
path: root/src
diff options
context:
space:
mode:
authorAlan Pearce2014-09-28 16:40:56 +0100
committerAlan Pearce2014-09-28 16:41:05 +0100
commit5cc13ae3cec7a1778df2994d27a5594004f9a45a (patch)
tree6dd6a5c5f2858732b5ab5793a94392842dbdeeb2 /src
parented360808d94ea0e637881158b393da52827573e9 (diff)
downloadmicroformats-5cc13ae3cec7a1778df2994d27a5594004f9a45a.tar.lz
microformats-5cc13ae3cec7a1778df2994d27a5594004f9a45a.tar.zst
microformats-5cc13ae3cec7a1778df2994d27a5594004f9a45a.zip
Remove redundant parents function
Diffstat (limited to 'src')
-rw-r--r--src/microformats/parser.clj6
1 files changed, 0 insertions, 6 deletions
diff --git a/src/microformats/parser.clj b/src/microformats/parser.clj
index cebfcc7..9377d4a 100644
--- a/src/microformats/parser.clj
+++ b/src/microformats/parser.clj
@@ -250,12 +250,6 @@
   (hash-map :type (get-mf-names element)
             :properties (get-mf-properties element)))
 
-;; Adapted from http://stackoverflow.com/a/7686324
-(defn- parents
-  [pred]
-  (html/zip-pred (fn [loc]
-                   (some pred (take-while identity (iterate z/up (z/up loc)))))))
-
 (defn select-h
   "Select top-level h-* elements within a HTML element."
   [loc]