tribes/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00
Code Activity

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
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
guix/read-print.scm
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."