about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorAlan Pearce2014-09-13 21:01:10 +0100
committerAlan Pearce2014-09-13 21:01:10 +0100
commitd7985eb9ef49be79296904e1ad292f9532a3310b (patch)
tree132d8b3318279fc51faf799e535bdc50dcd9c4f9
parente023b6df338859d4f62f77e68f3456319304b1ff (diff)
downloadmicroformats-d7985eb9ef49be79296904e1ad292f9532a3310b.tar.lz
microformats-d7985eb9ef49be79296904e1ad292f9532a3310b.tar.zst
microformats-d7985eb9ef49be79296904e1ad292f9532a3310b.zip
Give split-classes a clearer name
-rw-r--r--src/microformats/parser.clj6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/microformats/parser.clj b/src/microformats/parser.clj
index c721e5f..800d403 100644
--- a/src/microformats/parser.clj
+++ b/src/microformats/parser.clj
@@ -13,8 +13,8 @@
   [prefix]
   #(apply str (drop (count prefix) %)))
 
-(defn- split-classes
-  "Split a whitespace-separated string."
+(defn- split-ws-attribute
+  "Split a whitespace-separated attribute."
   [class]
   (str/split class #"\s+"))
 
@@ -30,7 +30,7 @@
   [el] (some-> el
                :attrs
                :class
-               split-classes))
+               split-ws-attribute))
 
 (defn get-p-value
   "Get the p-x property value of an element"