mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

vicfg: New command, allows editing (or simply viewing) most of the repository configuration settings stored in the git-annex branch.

Browse source 
Incomplete; I need to finish parsing and saving. This will also be used
for editing transfer control expresssions.

Removed the group display from the status output, I didn't really
like that format, and vicfg can be used to see as well as edit rempository
group membership.
This commit is contained in:
Joey Hess 2012-10-03 17:04:52 -04:00
parent 949fdcb63a
commit 7a7f63182c
10 changed files with 179 additions and 45 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Limit.hs
View file

@ -19,6 +19,7 @@ import qualified Remote
import qualified Backend
import Annex.Content
import Logs.Trust
import Types.TrustLevel
import Logs.Group
import Utility.HumanTime
@ -91,7 +92,7 @@ addCopies :: String -> Annex ()
addCopies want = addLimit . check $ readnum num
where
(num, good) = case split ":" want of
[v, n] -> case readTrust v of
[v, n] -> case readTrustLevel v of
Just trust -> (n, checktrust trust)
Nothing -> (n, checkgroup v)
[n] -> (n, const $ return True)