mirror of
https://codeberg.org/guix/guix.git
synced 2025-10-02 02:15:12 +00:00
read-print: Adjust test for keyword alignment.
This is a followup to f774422769
, which
changed the rule without updating the test.
* tests/read-print.scm ("keyword-value-same-line"): Adjust.
Change-Id: Ie802ef3d2e577cb0647158baed0606c958394c06
This commit is contained in:
parent
48e0e6a127
commit
536909ea67
1 changed files with 9 additions and 7 deletions
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2021-2023 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2021-2023, 2025 Ludovic Courtès <ludo@gnu.org>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -274,17 +274,19 @@ mnopqrstuvwxyz.\")"
|
|||
'(#:phases %standard-phases
|
||||
#:tests? #f)))")
|
||||
|
||||
;; '#:key value' is kept on the same line.
|
||||
;; '#:key value' is kept on the same line, except when followed by a gexp.
|
||||
(test-pretty-print "\
|
||||
(package
|
||||
(name \"keyword-value-same-line\")
|
||||
(arguments
|
||||
(list
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'x 'y
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(foo bar baz))))
|
||||
#:make-flags #~'(\"ANSWER=42\")
|
||||
#:make-flags
|
||||
#~'(\"ANSWER=42\")
|
||||
#:tests? #f)))")
|
||||
|
||||
(test-pretty-print "\
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue