From 9acfdd923967c31b9e3a8d5793f721f3bf1e9acd Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 16 Oct 2013 12:14:14 -0400 Subject: fix off-by-one --- Git/CheckAttr.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Git') diff --git a/Git/CheckAttr.hs b/Git/CheckAttr.hs index 40259881a..94ead5b4c 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 -- cgit v1.2.3