diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/microformats/parser.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/microformats/parser.clj b/src/microformats/parser.clj index 9bc9d84..92104dc 100644 --- a/src/microformats/parser.clj +++ b/src/microformats/parser.clj @@ -328,8 +328,8 @@ [loc] (when (and (not (z/end? loc)) (not (contains? #{:br :hr} (-> loc z/node :tag)))) - (if-let [class-groups (some->> loc z/node :attrs :class (re-seq #"(?:^|\s)(h|p|u|dt|e)-\w+") (map second) distinct first list)] (map (partial parse-mf loc) class-groups) + (if-let [types (some->> loc z/node :attrs :class (re-seq #"(?:^|\s)(h|p|u|dt|e)-\w+") (map second) set)] (recur (z/next loc))))) (defn continue-walking |