moving to new metadata/docstrings

1 files changed, 13 insertions, 13 deletions

diff --git a/src/boot.clj b/src/boot.clj
index 3f39ff3a..0ac2383b 100644
--- a/src/boot.clj
+++ b/src/boot.clj
@@ -2058,19 +2058,19 @@ make-proxy [classes method-map]
   [#^java.util.regex.Pattern re s]
     (. re (matcher s)))
 
-(defn
-	#^{:doc "Returns the groups from the most recent match/find. If
-		there are no nested groups, returns a string of the entire
-		match. If there are nested groups, returns a vector of the
-		groups, the first element being the entire match."}
-re-groups [#^java.util.regex.Matcher m]
-  (let [gc  (. m (groupCount))]
-    (if (zero? gc)
-      (. m (group))
-      (loop [ret [] c 0]
-	(if (<= c gc)
-	  (recur (conj ret (. m (group c))) (inc c))
-	  ret)))))
+(defn re-groups
+  "Returns the groups from the most recent match/find. If there are no
+  nested groups, returns a string of the entire match. If there are
+  nested groups, returns a vector of the groups, the first element
+  being the entire match."
+  [#^java.util.regex.Matcher m]
+    (let [gc  (. m (groupCount))]
+      (if (zero? gc)
+        (. m (group))
+        (loop [ret [] c 0]
+          (if (<= c gc)
+            (recur (conj ret (. m (group c))) (inc c))
+            ret)))))
 
 (defn re-seq
   "Returns a lazy sequence of successive matches of pattern in string,