fix toDirectGen bug introduced in 247b7e9e58
		
	This commit is contained in:
		
					parent
					
						
							
								991d09139d
							
						
					
				
			
			
				commit
				
					
						4829eae883
					
				
			
		
					 1 changed files with 1 additions and 0 deletions
				
			
		| 
						 | 
				
			
			@ -191,6 +191,7 @@ toDirectGen k f = do
 | 
			
		|||
		{- Move content from annex to direct file. -}
 | 
			
		||||
		thawContentDir loc
 | 
			
		||||
		updateInodeCache k loc
 | 
			
		||||
		addAssociatedFile k f
 | 
			
		||||
		thawContent loc
 | 
			
		||||
		replaceFile f $ liftIO . moveFile loc
 | 
			
		||||
	fromdirect = do
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue