mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 05:18:07 -05:00
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 @@ (define (entry-type name properties)
|
|||
((= stat:type 'directory)
|
||||
(append (scheme-files absolute)
|
||||
result))
|
||||
(_ result)))))
|
||||
(_ result)))
|
||||
(else
|
||||
result)))
|
||||
(else
|
||||
result))))))
|
||||
'()
|
||||
|
|
Loading…
Reference in a new issue