diff --git a/08-hs-monads-json/src/Lib.hs b/08-hs-monads-json/src/Lib.hs
index 53d1002..69f17b6 100644
--- a/08-hs-monads-json/src/Lib.hs
+++ b/08-hs-monads-json/src/Lib.hs
@@ -63,7 +63,7 @@ stringP input = sequenceA $ map charP input
 -- stringP = traverse charP
 
 -- runParser (fmap ord $ charP 'h') "hello"
--- runParser (stringP "hello) "hello world!"
+-- runParser (stringP "hello") "hello world!"
 
 jsonNull :: Parser JsonValue
 jsonNull = (\_ -> JsonNull) <$> stringP "null"
diff --git a/exercises/lists/06_list_slice.hs b/exercises/lists/06_list_slice.hs
index 1814df0..fbed632 100644
--- a/exercises/lists/06_list_slice.hs
+++ b/exercises/lists/06_list_slice.hs
@@ -1,5 +1,5 @@
 -- Izvuci podlistu od indeksa i do indeksa j
--- slice [1..10] 2 4 = [2,3]
+-- slice [1..10] 2 4 = [2,3,4]
 
 slice :: [a] -> Int -> Int -> [a]
 slice xs i j = take (j-i+1) $ drop (i-1) xs