git config remote.name.annex-sync can be used to control whether a remote gets synced.
This commit is contained in:
		
					parent
					
						
							
								1591245f88
							
						
					
				
			
			
				commit
				
					
						589d1711f2
					
				
			
		
					 4 changed files with 15 additions and 1 deletions
				
			
		|  | @ -26,6 +26,7 @@ import Git.Types (BlobType(..)) | |||
| import qualified Types.Remote | ||||
| import qualified Remote.Git | ||||
| import Types.Key | ||||
| import Config | ||||
| 
 | ||||
| import qualified Data.ByteString.Lazy as L | ||||
| import Data.Hash.MD5 | ||||
|  | @ -71,7 +72,8 @@ syncRemotes rs = ifM (Annex.getState Annex.fast) ( nub <$> pickfast , wanted ) | |||
| 					unwords (map Types.Remote.name s) | ||||
| 			return l | ||||
| 		available = filter (not . Remote.specialRemote) | ||||
| 			<$> Remote.enabledRemoteList | ||||
| 			<$> (filterM (repoSyncable . Types.Remote.repo) | ||||
| 				=<< Remote.enabledRemoteList) | ||||
| 		good = filterM $ Remote.Git.repoAvail . Types.Remote.repo | ||||
| 		fastest = fromMaybe [] . headMaybe . Remote.byCost | ||||
| 
 | ||||
|  |  | |||
|  | @ -86,6 +86,11 @@ repoNotIgnored :: Git.Repo -> Annex Bool | |||
| repoNotIgnored r = not . fromMaybe False . Git.Config.isTrue | ||||
| 	<$> getRemoteConfig r "ignore" "" | ||||
| 
 | ||||
| {- Checks if a repo should be synced. -} | ||||
| repoSyncable :: Git.Repo -> Annex Bool | ||||
| repoSyncable r = fromMaybe True . Git.Config.isTrue | ||||
| 	<$> getRemoteConfig r "sync" "" | ||||
| 
 | ||||
| {- If a value is specified, it is used; otherwise the default is looked up | ||||
|  - in git config. forcenumcopies overrides everything. -} | ||||
| getNumCopies :: Maybe Int -> Annex Int | ||||
|  |  | |||
							
								
								
									
										2
									
								
								debian/changelog
									
										
									
									
										vendored
									
									
								
							
							
						
						
									
										2
									
								
								debian/changelog
									
										
									
									
										vendored
									
									
								
							|  | @ -11,6 +11,8 @@ git-annex (3.20121010) UNRELEASED; urgency=low | |||
|   * webapp: Improve wording of intro display. Closes: #689848 | ||||
|   * webapp: Repositories can now be configured, to change their description, | ||||
|     their group, or even to disable syncing to them. | ||||
|   * git config remote.name.annex-sync can be used to control whether | ||||
|     a remote gets synced. | ||||
| 
 | ||||
|  -- Joey Hess <joeyh@debian.org>  Wed, 10 Oct 2012 12:59:25 -0400 | ||||
| 
 | ||||
|  |  | |||
|  | @ -795,6 +795,11 @@ Here are all the supported configuration settings. | |||
|   Or, it could be used if the network connection between two | ||||
|   repositories is too slow to be used normally. | ||||
| 
 | ||||
| * `remote.<name>.annex-sync` | ||||
| 
 | ||||
|   If set to `false`, prevents git-annex sync (and the git-annex assistant) | ||||
|   from syncing with this remote. | ||||
| 
 | ||||
| * `remote.<name>.annexUrl` | ||||
| 
 | ||||
|   Can be used to specify a different url than the regular `remote.<name>.url` | ||||
|  |  | |||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue
	
	 Joey Hess
				Joey Hess