summaryrefslogtreecommitdiff
path: root/GitAnnex.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-01-23 17:00:10 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-01-23 17:00:10 -0400
commitba6088b249902d456177af3c14f20f43b6def1fd (patch)
tree43bd6cf141c63693732d4066c0d9590c0c077822 /GitAnnex.hs
parent5e172b43c4dc5d779e4f1af5c1376c9a8ebc60a4 (diff)
rename readMaybe to readish
a stricter (but also partial) readMaybe is getting added to base
Diffstat (limited to 'GitAnnex.hs')
-rw-r--r--GitAnnex.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/GitAnnex.hs b/GitAnnex.hs
index bc3541676..4af10a9ce 100644
--- a/GitAnnex.hs
+++ b/GitAnnex.hs
@@ -119,7 +119,7 @@ options = Option.common ++
"skip files not using a key-value backend"
] ++ Option.matcher
where
- setnumcopies v = Annex.changeState $ \s -> s {Annex.forcenumcopies = readMaybe v }
+ setnumcopies v = Annex.changeState $ \s -> s {Annex.forcenumcopies = readish v }
setgitconfig :: String -> Annex ()
setgitconfig v = do
newg <- inRepo $ Git.Config.store v