1module Bun.Server (serve) where
5import Bun.Request (Request)
6import Bun.Response (Response)
7import Control.Promise (Promise)
8import Control.Promise as Promise
10import Effect.Aff (Aff)
12foreign import serve_ :: (Request -> Effect (Promise Response)) -> Effect Unit
14serve :: (Request -> Aff Response) -> Effect Unit
15serve f = serve_ (\req -> Promise.fromAff (f req))
keysesc to close
- j k
- move down, up
- enter
- open
- esc
- back, or up a level
- 1 2 3 4
- readme, files, commits, refs
- /
- filter
- y
- copy the clone command
- c
- compare the chosen commit with another (or shift-click both)
- ?
- show or hide this list