From a4de139f26acf877c00b796582abfbcb96e23013 Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Sat, 27 Jan 2024 02:28:12 +0100 Subject: Reorganize the channels.scm file MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Squashed commit of the following: commit b13c42e76bafd8ea494700e3be75eb4212231623 Author: Marek Paśnikowski Date: Sat Jan 27 02:16:29 2024 +0100 Separate data from logic in definition of marekpasnikowski The intent is to implement the "no literals in logic" strategy. commit 0974fba9ac30cfab548b84419c846dd782917a57 Author: Marek Paśnikowski Date: Sat Jan 27 02:08:04 2024 +0100 Separate data from logic in definition of guix The intent is to implement the "no literals in logic" strategy. commit f30e5406b7508f77a528f50c1c71463eab1bb334 Author: Marek Paśnikowski Date: Sat Jan 27 01:20:06 2024 +0100 Define marekpasnikowski channel The goal is functional decomposition of the file. commit 762534ac39b88f7a9d0040af4a49d00222496884 Author: Marek Paśnikowski Date: Sat Jan 27 01:02:14 2024 +0100 Define guix channel The goal is functional decomposition of the file. --- systems/izumi/channels.scm | 49 +++++++++++++++++++++++++++++----------------- 1 file changed, 31 insertions(+), 18 deletions(-) (limited to 'systems/izumi/channels.scm') diff --git a/systems/izumi/channels.scm b/systems/izumi/channels.scm index 290e2a6..71f28c8 100644 --- a/systems/izumi/channels.scm +++ b/systems/izumi/channels.scm @@ -1,21 +1,34 @@ ( define-module ( systems izumi channels ) #:use-module ( guix channels ) ) -( list - ( channel - ( introduction - ( make-channel-introduction - "9edb3f66fd807b096b48283debdcddccfea34bad" - ( openpgp-fingerprint - "BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA" ) ) ) - ( name 'guix ) - ( url "https://git.savannah.gnu.org/git/guix.git" ) ) - ( channel - ( branch "channel" ) - ( introduction - ( make-channel-introduction - "c24ce7cb11e74da13d491f9de3c4b7040a069f43" - ( openpgp-fingerprint - "590E 500F E39D 26B3 E60B 743B 6D81 B120 7711 899F" ) ) ) - ( name 'channel ) - ( url "https://git.marekpasnikowski.pl/git/channel.git" ) ) ) +( define guix + ( let + ( ( introduction + ( make-channel-introduction + "9edb3f66fd807b096b48283debdcddccfea34bad" + ( openpgp-fingerprint + "BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA" ) ) ) + ( name 'guix ) + ( url "https://git.savannah.gnu.org/git/guix.git" ) ) + ( channel + ( introduction introduction ) + ( name name ) + ( url url ) ) ) ) + +( define marekpasnikowski + ( let + ( ( branch "channel" ) + ( introduction + ( make-channel-introduction + "c24ce7cb11e74da13d491f9de3c4b7040a069f43" + ( openpgp-fingerprint + "590E 500F E39D 26B3 E60B 743B 6D81 B120 7711 899F" ) ) ) + ( name 'channel ) + ( url "https://git.marekpasnikowski.pl/git/channel.git" ) ) + ( channel + ( branch branch ) + ( introduction introduction ) + ( name name ) + ( url url ) ) ) ) + +( list guix marekpasnikowski ) -- cgit v1.2.3