diff --git a/Utility/BadPrelude.hs b/Utility/BadPrelude.hs
index 7921a7e9b7..8e4105ceea 100644
--- a/Utility/BadPrelude.hs
+++ b/Utility/BadPrelude.hs
@@ -12,11 +12,11 @@ head :: [a] -> a
 head = Prelude.head
 
 {- tail is also partial -}
-tail :: [a] -> a
+tail :: [a] -> [a]
 tail = Prelude.tail
 
 {- init too -}
-init :: [a] -> a
+init :: [a] -> [a]
 init = Prelude.init
 
 {- last too -}