From c72cdfea5bb2ff6fff2382061f156b76795b71fb Mon Sep 17 00:00:00 2001
From: Edoardo La Greca
Date: Tue, 23 Sep 2025 20:48:00 +0200
Subject: fix missing import and function type for fourth exercise

---
 lec07/JoinList.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lec07/JoinList.hs b/lec07/JoinList.hs
index db74811..0d62d94 100644
--- a/lec07/JoinList.hs
+++ b/lec07/JoinList.hs
@@ -2,6 +2,7 @@
 module JoinList where
 
 import Buffer
+import Editor
 import Scrabble
 import Sized
 
@@ -95,7 +96,7 @@ instance Buffer (JoinList (Score, Size) String) where
   value jl = getScore $ foldJ 0 (\s -> scoreString s) (\x y -> x <> y) jl
     where getScore (Score s) = s
 
-initialLines :: [String]
+initialLines :: String
 initialLines =
   "This is the first line.\n" ++
   "Then this, which is the second line.\n" ++
-- 
cgit v1.2.3