Random button dashboard

[Nick Drozd]

(tui-define-component tui-random
  :get-initial-state
  (lambda ()
    `(:current-number ,(random 100)))
  :render
  (lambda ()
    (tui-let (&state current-number)
      (tui-div
       (tui-line
        "Random number: "
        current-number)
       (tui-link
        :target
        (lambda ()
          (tui--set-state
           component
           `(:current-number ,(number-to-string (random 100)))))
        "Regenerate")))))

[Erik Anderson]

See the current dev branch.

Useful for testing:

(tui-render-with-buffer "*random-button-test*"
  (tui-random))

Use tui-button for the button styling you were aiming for. Want to create a PR into dev to add that demo?