diff options
-rw-r--r-- | src/microformats/parser.clj | 6 |
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] |