From 6953d2dc81605765a14c751d075830f9cbd26ba0 Mon Sep 17 00:00:00 2001
From: Chris Badahdah <a.s.badahdah@gmail.com>
Date: Thu, 8 Aug 2024 22:46:58 -0700
Subject: [PATCH] Add `:on-load-1` launcher option

---
 src/portal/runtime/rpc.cljc | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/portal/runtime/rpc.cljc b/src/portal/runtime/rpc.cljc
index 20f9fd4a..0404d97e 100644
--- a/src/portal/runtime/rpc.cljc
+++ b/src/portal/runtime/rpc.cljc
@@ -12,6 +12,11 @@
   (when-let [f (get-in session [:options :on-load])]
     (try
       (f)
+      (catch #?(:cljs :default :default Exception) e
+        (tap> e))))
+  (when-let [f (get-in session [:options :on-load-1])]
+    (try
+      (f (c/make-atom (:session-id session)))
       (catch #?(:cljs :default :default Exception) e
         (tap> e)))))