Permalink
Browse files

Rearranged function order a little

  • Loading branch information...
1 parent 66a730e commit e0b1acf70d7b01123b74eee092ebd12013b97b39 @weavejester weavejester committed Dec 18, 2010
Showing with 5 additions and 7 deletions.
  1. +5 −7 src/clout/core.clj
View
@@ -69,13 +69,6 @@
"If the route matches the supplied request, the matched keywords are
returned as a map. Otherwise, nil is returned."))
-(declare route-compile)
-
-(extend-type String
- Route
- (route-matches [route request]
- (route-matches (route-compile route) request)))
-
(defrecord CompiledRoute [re keys absolute?]
Route
(route-matches [route request]
@@ -142,3 +135,8 @@
word word-group
literal nil))
(absolute-url? path)))))
+
+(extend-type String
+ Route
+ (route-matches [route request]
+ (route-matches (route-compile route) request)))

0 comments on commit e0b1acf

Please sign in to comment.