From ee3b5b2a4279292d55af43c772cdfd0c56420798 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Tue, 20 Dec 2011 14:37:53 -0400
Subject: use Common in a few more modules

---
 Git/LsTree.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Git/LsTree.hs')

diff --git a/Git/LsTree.hs b/Git/LsTree.hs
index 919e9af83..aae7f1263 100644
--- a/Git/LsTree.hs
+++ b/Git/LsTree.hs
@@ -16,10 +16,10 @@ import Control.Applicative
 import System.Posix.Types
 import qualified Data.ByteString.Lazy.Char8 as L
 
+import Common
 import Git
 import Git.Command
 import qualified Git.Filename
-import Utility.SafeCommand
 
 data TreeItem = TreeItem
 	{ mode :: FileMode
@@ -37,7 +37,7 @@ lsTree t repo = map parseLsTree <$>
  - (The --long format is not currently supported.) -}
 parseLsTree :: L.ByteString -> TreeItem
 parseLsTree l = TreeItem 
-	{ mode = fst $ head $ readOct $ L.unpack m
+	{ mode = fst $ Prelude.head $ readOct $ L.unpack m
 	, typeobj = L.unpack t
 	, sha = L.unpack s
 	, file = Git.Filename.decode $ L.unpack f
-- 
cgit v1.2.3