rename readMaybe to readish

a stricter (but also partial) readMaybe is getting added to base

1 files changed, 1 insertions, 1 deletions

diff --git a/Seek.hs b/Seek.hs
index 8e935c90c..b4e1218e2 100644
--- a/Seek.hs
+++ b/Seek.hs
@@ -36,7 +36,7 @@ withAttrFilesInGit attr a params = do
 withNumCopies :: (Maybe Int -> FilePath -> CommandStart) -> CommandSeek
 withNumCopies a params = withAttrFilesInGit "annex.numcopies" go params
 	where
-		go (file, v) = a (readMaybe v) file
+		go (file, v) = a (readish v) file
 
 withBackendFilesInGit :: (BackendFile -> CommandStart) -> CommandSeek
 withBackendFilesInGit a params =