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

comment

Browse source
This commit is contained in:
Joey Hess 2012-12-19 12:50:24 -04:00
parent 62e15d824c
commit 915cd7f676
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Command/Add.hs
View file

@ -27,9 +27,9 @@ def = [command "add" paramPaths seek "add files to annex"]
seek :: [CommandSeek] seek :: [CommandSeek]
seek = [withFilesNotInGit start, withFilesUnlocked start] seek = [withFilesNotInGit start, withFilesUnlocked start]
{- The add subcommand annexes a file, storing it in a backend, and then {- The add subcommand annexes a file, generating a key for it using a
- moving it into the annex directory and setting up the symlink pointing - backend, and then moving it into the annex directory and setting up
- to its content. -} - the symlink pointing to its content. -}
start :: FilePath -> CommandStart start :: FilePath -> CommandStart
start file = notBareRepo $ ifAnnexed file fixup add start file = notBareRepo $ ifAnnexed file fixup add
where where