From: Neil Smith <NeilNjae@users.noreply.github.com>
Date: Mon, 9 Dec 2024 15:56:13 +0000 (+0000)
Subject: Fixed typo
X-Git-Url: https://git.njae.me.uk/?a=commitdiff_plain;h=ba3bd8227dc00a18cd5df2b70716d403a9758a41;p=advent-of-code-24.git

Fixed typo
---

diff --git a/advent09/Main.hs b/advent09/Main.hs
index 15f5b9e..6d85624 100644
--- a/advent09/Main.hs
+++ b/advent09/Main.hs
@@ -110,7 +110,7 @@ packFile fid disk
   | isNothing gap = disk
   | otherwise = prefix ++ [Used fSize fid, Free (gapSize - fSize)] ++ mid ++ [Free fSize] ++ suffix
   where
-    (orefixMid, ((Used fSize _) : suffix)) = span ((/= fid) . fileID) disk
+    (prefixMid, ((Used fSize _) : suffix)) = span ((/= fid) . fileID) disk
     gap = findFree fSize prefixMid
     (prefix, Free gapSize, mid) = fromJust gap