diff --git a/src/List.elm b/src/List.elm
index ac59e144..ab9e92a2 100644
--- a/src/List.elm
+++ b/src/List.elm
@@ -62,7 +62,7 @@ singleton value =
 -}
 repeat : Int -> a -> List a
 repeat n value =
-  if isInfinite n then
+  if isPositiveInfinity n then
     []
   
   else