Add :on-load-1 launcher option

Author: djblue

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)))))