Wrap bidi tree in * vhost to enable usage of url-for/path-for

src/asciinema/component/yada_listener.clj

@@ -1,5 +1,6 @@
 (ns asciinema.component.yada-listener
-  (:require [com.stuartsierra.component :as component]
+  (:require [bidi.vhosts :refer [vhosts-model]]
+            [com.stuartsierra.component :as component]
             [yada.yada :as yada]))
 
 (defrecord YadaListener [port server app]
@@ -7,7 +8,7 @@
   (start [component]
     (if server
       component
-      (let [handler (:routes app)
+      (let [handler (vhosts-model [:* (:routes app)]) ; wrap in * vhost to make path-for work
             server (yada/listener handler {:port port})]
         (assoc component :server server))))
   (stop [component]