Merge pull request #685 from PEZ/rf-match-to-path-optional-arities

Add arities 1 and 2 to rf/match->path

modules/reitit-frontend/src/reitit/frontend.cljs

@@ -42,10 +42,14 @@
   match->path
   "Create routing path from given match and optional query-string map and
   optional fragment string."
-  [match query-params fragment]
-  (when-let [path (r/match->path match query-params)]
-    (cond-> path
-      (and fragment (seq fragment)) (str "#" (impl/form-encode fragment)))))
+  ([match]
+   (match->path match nil nil))
+  ([match query-params]
+   (match->path match query-params nil))
+  ([match query-params fragment]
+   (when-let [path (r/match->path match query-params)]
+     (cond-> path
+       (and fragment (seq fragment)) (str "#" (impl/form-encode fragment))))))
 
 (defn match-by-path
   "Given routing tree and current path, return match with possibly

test/cljs/reitit/frontend/core_test.cljs

@@ -285,6 +285,8 @@
 
 (deftest match->path-test
   (is (= "foo"
+         (rf/match->path {:path "foo"})
+         (rf/match->path {:path "foo"} nil)
          (rf/match->path {:path "foo"} nil nil)
          (rf/match->path {:path "foo"} {} "")))
   (is (= "foo?a=1&b=&c=foo+bar"