summaryrefslogtreecommitdiff
path: root/lec07
diff options
context:
space:
mode:
Diffstat (limited to 'lec07')
-rw-r--r--lec07/JoinList.hs3
1 files changed, 2 insertions, 1 deletions
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" ++