From 7d1d94c31d98f8232504c0a0235ee939ae9a2957 Mon Sep 17 00:00:00 2001
From: Alexander Heldt <me@alexanderheldt.se>
Date: Sat, 8 Nov 2025 20:56:18 +0100
Subject: [PATCH] secure-treasure-chest v2

---
 secure-treasure-chest/src/secure_treasure_chest.gleam | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/secure-treasure-chest/src/secure_treasure_chest.gleam b/secure-treasure-chest/src/secure_treasure_chest.gleam
index 25ec525..1cdd7aa 100644
--- a/secure-treasure-chest/src/secure_treasure_chest.gleam
+++ b/secure-treasure-chest/src/secure_treasure_chest.gleam
@@ -1,7 +1,7 @@
 import gleam/string
 
 pub opaque type TreasureChest(a) {
-  TreasureChest(String, a)
+  TreasureChest(password: String, treasure: a)
 }
 
 pub fn create(
@@ -18,11 +18,8 @@ pub fn open(
   chest: TreasureChest(treasure),
   password: String,
 ) -> Result(treasure, String) {
-  case chest {
-    TreasureChest(pass, treasure) ->
-      case pass == password {
-        False -> Error("Incorrect password")
-        True -> Ok(treasure)
-      }
+  case chest.password == password {
+    False -> Error("Incorrect password")
+    True -> Ok(chest.treasure)
   }
 }