mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-18 21:46:35 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

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

Browse source 
* 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
Show stats Download patch file Download diff file Expand all files Collapse all files

4
guix/read-print.scm
View file

@ -299,6 +299,7 @@ (define %special-forms
('unless 2)
('package 1)
('origin 1)
('channel 1)
('modify-inputs 2)
('modify-phases 2)
('add-after '(((modify-phases) . 3)))
@ -342,7 +343,8 @@ (define %newline-forms
('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."