From: Taran Nathan <moogoesmeow123@gmail.com>
Date: Thu, 11 Jun 2026 16:51:17 +0000 (-0400)
Subject: port and lazy key base unwrapping
X-Git-Url: https://git.taranathan.com/?a=commitdiff_plain;h=e2abef1e0728828128e1bc34246054c730881085;p=filestuffs.git

port and lazy key base unwrapping
---

diff --git a/src/filestuffs.gleam b/src/filestuffs.gleam
index 7e0c49e..bf5670d 100644
--- a/src/filestuffs.gleam
+++ b/src/filestuffs.gleam
@@ -1,6 +1,7 @@
 import argv
 import envoy
 import gleam/erlang/process
+import gleam/int
 import gleam/io
 import gleam/result
 import mist
@@ -27,13 +28,17 @@ fn web(file_path: String, password: String) -> Nil {
   wisp.configure_logger()
 
   let secret_key_base =
-    result.unwrap(envoy.get("SECRET_KEY_BASE"), wisp.random_string(64))
+    result.lazy_unwrap(envoy.get("SECRET_KEY_BASE"), fn() {
+      wisp.random_string(64)
+    })
 
   let assert Ok(_) =
     router.handle_request(_, file_path, password)
     |> wisp_mist.handler(secret_key_base)
     |> mist.new
-    |> mist.port(8000)
+    |> mist.port(
+      envoy.get("PORT") |> result.try(int.parse) |> result.unwrap(8000),
+    )
     |> mist.start
 
   process.sleep_forever()