reitit 2020-05-31 | Slack Archive

believelody11:05:02

Hello guys, ok I have a very weird error message when I run my with reitit. This happened when I import reitit.ring or reitit.core. The message is: "Exception in thread "main" java.lang.RuntimeException: Unable to resolve symbol: qualified-keyword? in this context, compiling:(reitit/trie.cljc:317:14)" So, I'm just trying to run a basic ring app with jetty using reitit. This is my core:

(ns comment.core
  (:require [reitit.core :as r]
            [reitit.ring :as ring]
            [ring.adapter.jetty :as jetty]))

(def routes
  [["/ping" {:get (fn [_] {:status 200, :body "ok"})}]])

(def router
  (ring/router routes))

(def app
  (ring/ring-handler router))

(defn start []
  (jetty/run-jetty #'app {:port 3000 :join? false}))

My app crashes because of one reitit dependecies. I cannot figure out what's the problem.

ikitommi12:05:53

@believelody my guess is that you are using Clojure 1.8 or earlier. qualified-keyword? was introduced in Clojure 1.9.0

believelody12:05:26

@ikitommi oh my god you right! Thanks a lot, now everything is okay!

kitallis18:05:44

I have a route like this: https://github.com/nilenso/pencil.space/blob/alpha/client/cljs/src/routes.cljs#L43 (it currently doesn’t do anything). But the idea is: • If someone lands on this page directly, I’d want to run some function to determine some boolean, if it’s false, render some other view which is not the :view • If I manually dispatch to this route, it can still run that function, but it must render the default :view

kitallis18:05:27

What is the correct way to achieve this? Since in reitit, the route is always tied to a particular view, I can’t decide one way or another. Is it alright to check the app-db here and dispatch (redirect) to another route in :start?

just.sultanov09:06:34

I think you can rewrite your event ::navigated and add some business logic something like this:

(rf/reg-fx
  ::redirect
  (fn [name params query]
    (rfe/push-state name params query)))


(rf/reg-event-fx
  ::navigated
  (fn [{db :db} [_ new-match]]
    (if-not (get db :some-flag) ;; e.g. check user authenticated/authorized or another your business logic
      {::redirect ::to-your-default-view}
      (let [current-route (:current-route db)
            controllers   (rfc/apply-controllers (:controllers current-route) new-match)
            new-route     (assoc new-match :controllers controllers)]
        {:db (assoc db :current-route new-route)}))))

just.sultanov10:06:13

Or you can just create a subscription for your business logic flag and use it in a wrapper component to render the required component

kitallis15:06:15

yeah, the second is what I was thinking

kitallis15:06:34

I didn’t consider the first one, that might actually be cleaner since there’s really only 1 ~~default~~ fallback state and not many

kitallis15:06:41

thanks @U1EQNSHL4

2020-05-31

Channels