diff options
Diffstat (limited to 'Seek.hs')
-rw-r--r-- | Seek.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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 = |