discovery: Handle edge case in scheme-files when looking at symlinks.
Previously, this code would cause crashes in Guix (running guix package -s for example) which could be experienced when Emacs creates temporary files in the gnu/packages/patches directory when a patch file has been edited, but not saved. * guix/discovery.scm (scheme-files): Add else clause to cond used when handling symlinks.
This commit is contained in:
		
							parent
							
								
									7a2e0c52df
								
							
						
					
					
						commit
						1d0bde2ee4
					
				
					 1 changed files with 3 additions and 1 deletions
				
			
		| 
						 | 
				
			
			@ -78,7 +78,9 @@ DIRECTORY is not accessible."
 | 
			
		|||
                                 ((= stat:type 'directory)
 | 
			
		||||
                                  (append (scheme-files absolute)
 | 
			
		||||
                                          result))
 | 
			
		||||
                                 (_ result)))))
 | 
			
		||||
                                 (_ result)))
 | 
			
		||||
                              (else
 | 
			
		||||
                               result)))
 | 
			
		||||
                       (else
 | 
			
		||||
                        result))))))
 | 
			
		||||
              '()
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Reference in a new issue