From 82ff37520f705bf79e54ac0283ea3973add239e3 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 16 Oct 2013 12:14:14 -0400 Subject: [PATCH] fix off-by-one --- Git/CheckAttr.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Git/CheckAttr.hs b/Git/CheckAttr.hs index 40259881a3..94ead5b4c0 100644 --- a/Git/CheckAttr.hs +++ b/Git/CheckAttr.hs @@ -59,7 +59,7 @@ checkAttr (h, attrs, cwd) want file = do | '\0' `elem` s = if "\0" `isSuffixOf` s then let bits = segment (== '\0') s - in if length bits == numattrs * 3 + in if length bits == (numattrs * 3) + 1 then Just $ getattrvalues bits [] else Nothing -- more attributes to come else Nothing -- output incomplete