diff --git a/Proj.hs b/Proj.hs
index 3ab0bb2..c9c76b3 100644
--- a/Proj.hs
+++ b/Proj.hs
@@ -111,13 +111,13 @@ addNewDishes path = do
 testSuggestMeals :: Test
 testSuggestMeals =
   TestList
-    [ "Test suggestMeals for empty dish list"
+    [ "Test suggestMeals for not exist list"
         ~: do
           let csvFile = "empty.csv"
           result <- tryJust (guard . isDoesNotExistError) $ readCSV csvFile
           case result of
-            Left _ -> return () -- Test zakończy się powodzeniem, jeśli otrzymamy Left
-            Right _ -> assertFailure ("Test suggestMeals for empty dish list with file " ++ csvFile ++ ": should have failed to read CSV file"),
+            Left _ -> return () 
+            Right _ -> assertFailure ("Test suggestMeals for not exist list with file " ++ csvFile ++ ": should have failed to read CSV file"),
       "Test suggestMeals for non-empty dish list"
         ~: do
           let csvFile = "baza.csv"