server.clj

website.git · Tickets

Branches > main > d7a7f10 > files / src / dev / grahp / website / server.clj

(ns dev.grahp.website.server
  (:require
   [ring.adapter.jetty :refer [run-jetty]]))

(defn handler
  "Handles an HTTP request."
  [request]
  {:status 200
   :headers {"Content-Type" "text/html"}
   :body "Hello World"})

(defn main [{}]
  (run-jetty #'handler {:port 8000
                        :host "127.0.0.1"}))