From ec8eba18ad9481c8941eadb529aa938a64dafb9a Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 11 Mar 2016 14:33:38 -0400 Subject: [PATCH] fix warning --- Git/DiffTree.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Git/DiffTree.hs b/Git/DiffTree.hs index 0dac607e5c..645d18d35d 100644 --- a/Git/DiffTree.hs +++ b/Git/DiffTree.hs @@ -107,7 +107,7 @@ parseDiffRaw l = go l [] go (info:f:rest) c = case mk info f of Nothing -> Nothing Just i -> go rest (i:c) - go (s:[]) _ = Nothing + go (_:[]) _ = Nothing mk info f = DiffTreeItem <$> readmode srcm