chore: add main entry point

1 files changed, 11 insertions, 0 deletions

diff --git a/src/weepinbell/core.clj b/src/weepinbell/core.clj
new file mode 100644
index 0000000..bc8a4b6
--- /dev/null
+++ b/src/weepinbell/core.clj
@@ -0,0 +1,11 @@
+(ns weepinbell.core
+  (:require [ring.adapter.jetty :refer [run-jetty]]
+            [weepinbell.handler :refer [app]])
+  (:gen-class)) ;; Essential for "lein uberjar"
+
+(defn -main [& args]
+  ;; Check for a PORT environment variable, default to 3000
+  (let [port (Integer/parseInt (or (System/getenv "PORT") "3000"))]
+    (println "Starting Weepinbell server on port" port)
+    (run-jetty app {:port port :join? true})))
+