Haskell interactive serverside web framework inspired by HTMX
Go to file
Sean Hess ff28b402bf
Merge pull request #21 from seanhess/forms-records
Feedback Requested: Records-based forms
2024-10-01 12:00:30 -06:00
.github/workflows CI with nix 2024-07-24 17:11:32 +02:00
bin better dev workflow by porting code into examples 2024-06-14 08:11:44 -07:00
client Add dev environment with nix 2024-07-19 15:19:01 +02:00
example Merge branch 'main' into forms-records 2024-10-01 11:57:52 -06:00
src fixed import conflict 2024-10-01 11:59:37 -06:00
test Apply hlint to entire codebase and enable pre-commit check 2024-07-19 18:32:40 +02:00
.envrc Add dev environment with nix 2024-07-19 15:19:01 +02:00
.gitignore Add dev environment with nix 2024-07-19 15:19:01 +02:00
.hlint.yaml Apply hlint to entire codebase and enable pre-commit check 2024-07-19 18:32:40 +02:00
cabal.project Add dev environment with nix 2024-07-19 15:19:01 +02:00
CHANGELOG.md initial commit post-separation 2023-11-27 12:17:08 -06:00
flake.lock Add dev environment with nix 2024-07-19 15:19:01 +02:00
flake.nix Use old version of envparse 2024-07-31 20:39:05 +02:00
fourmolu.yaml Apply formatting to entire codebase and enable pre-commit check 2024-07-19 18:19:06 +02:00
hyperbole.cabal Merge branch 'main' into forms-records 2024-10-01 11:57:52 -06:00
LICENSE initial commit post-separation 2023-11-27 12:17:08 -06:00
package-lock.json counter example 2024-05-15 09:23:02 -07:00
package.yaml Merge branch 'main' into forms-records 2024-10-01 11:57:52 -06:00
README.md fixed readme, added christian 2024-07-24 08:17:53 -07:00

Hyperbole

Hackage

Create fully interactive HTML applications with type-safe serverside Haskell. Inspired by HTMX, Elm, and Phoenix LiveView

Learn more about Hyperbole on Hackage

{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TypeFamilies #-}

import Data.Text (Text)
import Web.Hyperbole

main = do
  run 3000 $ do
    liveApp (basicDocument "Example") (page mainPage)


mainPage = do
  handle message
  load $ do
    pure $ do
      el bold "My Page"
      hyper (Message 1) $ messageView "Hello"
      hyper (Message 2) $ messageView "World!"


data Message = Message Int
  deriving (Generic, ViewId)

data MessageAction = Louder Text
  deriving (Generic, ViewAction)

instance HyperView Message where
  type Action Message = MessageAction


message :: Message -> MessageAction -> Eff es (View Message ())
message _ (Louder m) = do
  let new = m <> "!"
  pure $ messageView new


messageView m = do
  el_ $ text m
  button (Louder m) id "Louder"

Examples

The example directory contains an app with pages demonstrating various features

Learn More

View Documentation on Hackage

View on Github

In Production

National Solar Observatory

The NSO uses Hyperbole for the L2 Data creation UI for the DKIST telescope

Local Development

Dependencies with Nix

With nix installed, you can use nix develop to get a shell with all dependencies installed.

Manual dependency installation

Download and install NPM. On a mac, can be installed via homebrew:

brew install npm

Install client dependencies

cd client
npm install

Recommended: Use direnv to automatically load environment from .env

brew install direnv
direnv allow

Building

Build JavaScript client

cd client
npx webpack

Run examples

cd example
cabal run

Tests

cabal test

File watching

Run tests, then recompile everything on file change and restart examples

bin/dev

Contributors