       "    </tr>"
       "    <tr>"
       "      <td>"
-      (if (= (type (:1 arg)) clojure.lang.Ref)
+      (if (ref? (:1 arg))
         (str
          "    <div class='ref'>"
          (fs/path-to-ref-index serialized (concat path '(:1)) 0)
          "    </div>"))
          "      </td>"
          "      <td>"
-      (tablize (if (= (type (:1 arg)) clojure.lang.Ref)
+      (tablize (if (ref? (:1 arg))
                  @(:1 arg) (:1 arg))
                (concat path (list :1))
                serialized opts)

   [environ.core :refer [env]]
   [hiccup.element :as e]
   [hiccup.page :as h]
   [dag-unify.core :as fs]))

(def menubar-enabled true)


      "    </tr>"
      "    <tr>"
      "      <td class='ref'>"
      (if (ref? (:1 arg))
        (str
         "     <div class='ref'>"
         (fs/path-to-ref-index serialized (concat path '(:1)) 0)
         "     </div>"))
      "      </td>"
      "      <td>"
      (tablize (if (ref? (:1 arg))
                 @(:1 arg)
                 (:1 arg))
               (concat path '(:1)) serialized opts)
      "      </td>"
      "      <td class='ref'>"
      (if (ref? (:2 arg))
        (str
         "    <div class='ref'>"
         (fs/path-to-ref-index serialized (concat path '(:2)) 0)
         "    </div>"))
         "      </td>"
         "      <td>"
      (tablize (if (ref? (:2 arg))
                 @(:2 arg)
                 (:2 arg))
               (concat path '(:2)) serialized opts)
