mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2025-01-18 13:36:36 +01:00
import: pypi: Preserve order of dependencies from ‘requires.txt’ and wheel.
Fixes a regression introduced in
a3ffb920f1
and revealed by
‘tests/pypi.scm’.
* guix/import/pypi.scm (parse-requires.txt): Reverse REQUIRED-DEPS and
TEST-DEPS when returning.
(parse-wheel-metadata): Likewise.
Change-Id: I2c374505052f0d9e46e7cc1c11d3e97ab522e068
This commit is contained in:
parent
13e7caf52c
commit
4ebc1aba19
1 changed files with 4 additions and 2 deletions
|
@ -283,7 +283,8 @@ (define (section-header? line)
|
|||
(let ((line (read-line port)))
|
||||
(cond
|
||||
((eof-object? line)
|
||||
(list required-deps test-deps))
|
||||
(list (reverse required-deps)
|
||||
(reverse test-deps)))
|
||||
((or (string-null? line) (comment? line))
|
||||
(loop required-deps test-deps inside-test-section? optional?))
|
||||
((section-header? line)
|
||||
|
@ -337,7 +338,8 @@ (define (test-requirement? line)
|
|||
(let ((line (read-line port)))
|
||||
(cond
|
||||
((eof-object? line)
|
||||
(list required-deps test-deps))
|
||||
(list (reverse required-deps)
|
||||
(reverse test-deps)))
|
||||
((and (requires-dist-header? line) (not (extra? line)))
|
||||
(loop (cons (specification->requirement-name
|
||||
(requires-dist-value line))
|
||||
|
|
Loading…
Reference in a new issue