Fix #163: add proxy for quotation-based on.afterRender

dotnet-websharper · Mar 29, 2018 · 7eeccc1 · 7eeccc1
1 parent 9fafe9e
commit 7eeccc1
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 0 deletions.
diff --git a/WebSharper.UI/Attr.Client.fs b/WebSharper.UI/Attr.Client.fs
@@ -265,6 +265,9 @@ type AttrProxy with
         Array.ofSeqNonCopying xs
         |> Array.TreeReduce Attr.Empty Attr.Append
 
+    static member OnAfterRenderImpl(q: Expr<Element -> unit>) =
+        As<Attr> (A4 (As q))
+
     static member HandlerImpl(event: string, q: Expr<Element -> #DomEvent-> unit>) =
         As<Attr> (Attrs.Static (fun el -> el.AddEventListener(event, (As<Element -> DomEvent -> unit> q) el, false)))
 

diff --git a/WebSharper.UI/HTML.Proxy.fs b/WebSharper.UI/HTML.Proxy.fs
@@ -29,6 +29,8 @@ open WebSharper.UI
 
 [<Proxy(typeof<Html.on>)>]
 type private onProxy =
+    [<JavaScript; Inline>]
+    static member afterRender (f: Expr<Dom.Element -> unit>) = Attr.OnAfterRenderImpl(f)
     // {{ event
     [<JavaScript; Inline>]
     static member abort (f: Expr<Dom.Element -> Dom.UIEvent -> unit>) = Attr.HandlerImpl("abort", f)