:fact-type-fn does not appear to stick with defsession.

clara2.clj

(ns app.mv.clara2
  (:require
    [clara.rules :refer :all]
    [clara.tools.inspect :as inspect]
    )
  )

(defsession session :fact-type-fn :type)

(defquery a-query
  []
  [?fact <- :fact])

;; I have the impression that :fact-type-fn does not stick with the session 
(defn this-should-show-activations-but-it-doesnt
  []
  (-> session
      (insert {:type :fact :foo :bar})
      (fire-rules)
      (inspect/explain-activations)
      )
  )

(defn this-shows-activations
  []
  (-> (mk-session :fact-type-fn :type)
      (insert {:type :fact :foo :bar})
      (fire-rules)
      (inspect/explain-activations)
      )
  )

(comment
  (this-should-show-activations-but-it-doesnt)

  (this-shows-activations)
  
  )