From 95d2391f58ae240e7100f0d5488dd7246f71f3bb Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 15 Dec 2011 18:11:42 -0400 Subject: more partial function removal Left a few Prelude.head's in where it was checked not null and too hard to remove, etc. --- Common.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'Common.hs') diff --git a/Common.hs b/Common.hs index 7e8dd9a2a..f3dd701b1 100644 --- a/Common.hs +++ b/Common.hs @@ -6,7 +6,7 @@ import Control.Monad.State as X (liftIO) import Control.Exception.Extensible as X (IOException) import Data.Maybe as X -import Data.List as X +import Data.List as X hiding (head, tail, init, last) import Data.String.Utils as X import System.Path as X @@ -25,3 +25,5 @@ import Utility.SafeCommand as X import Utility.Path as X import Utility.Directory as X import Utility.Monad as X + +import Utility.BadPrelude as X -- cgit v1.2.3