read-print: Special-case channel-related forms.

* guix/read-print.scm (%special-forms, %newline-forms): Add
channel-related forms.
This commit is contained in:
Ludovic Courtès 2023-03-02 19:37:02 +01:00
parent c89235fa85
commit 11f6bdc547
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 3 additions and 1 deletions

View File

@ -299,6 +299,7 @@ expressions and blanks that were read."
('unless 2)
('package 1)
('origin 1)
('channel 1)
('modify-inputs 2)
('modify-phases 2)
('add-after '(((modify-phases) . 3)))
@ -342,7 +343,8 @@ expressions and blanks that were read."
('services '(operating-system))
('set-xorg-configuration '())
('services '(home-environment))
('home-bash-configuration '(service))))
('home-bash-configuration '(service))
('introduction '(channel))))
(define (prefix? candidate lst)
"Return true if CANDIDATE is a prefix of LST."