Toggle button
Pressed state
open System
open FSharp.ViewEngine
open Acme.Components.Primitives
open Acme.Components.Application
open type Html
open type Svg
open type Datastar
let compactRows =
ToggleButton.create "components-compact-rows" "Compact rows"
|> ToggleButton.pressed
|> ToggleButton.renderPending
open System
open FSharp.ViewEngine
open Acme.Components.Primitives
open Acme.Components.Application
open type Html
open type Svg
open type Datastar
let pendingCompactRows =
ToggleButton.create "components-pending-compact-rows" "Applying compact rows"
|> ToggleButton.pending
|> ToggleButton.renderDisabled
open System
open FSharp.ViewEngine
open Acme.Components.Primitives
open Acme.Components.Application
open type Html
open type Svg
open type Datastar
let disabledCompactRows =
ToggleButton.create "components-disabled-compact-rows" "Compact rows unavailable"
|> ToggleButton.disabled
|> ToggleButton.render