[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
06/07: channels: Add 'checkout->channel-instance'.
From: |
guix-commits |
Subject: |
06/07: channels: Add 'checkout->channel-instance'. |
Date: |
Wed, 28 Nov 2018 04:40:18 -0500 (EST) |
civodul pushed a commit to branch master
in repository guix.
commit fe5db4eb03ff55a7b5731bea57f813cb8a9e3d8b
Author: Ludovic Courtès <address@hidden>
Date: Mon Nov 26 17:16:18 2018 +0100
channels: Add 'checkout->channel-instance'.
* guix/channels.scm (checkout->channel-instance): New procedure.
---
guix/channels.scm | 12 ++++++++++++
1 file changed, 12 insertions(+)
diff --git a/guix/channels.scm b/guix/channels.scm
index 82389eb..e57da68 100644
--- a/guix/channels.scm
+++ b/guix/channels.scm
@@ -47,6 +47,7 @@
channel-instance-checkout
latest-channel-instances
+ checkout->channel-instance
latest-channel-derivation
channel-instances->manifest
channel-instances->derivation))
@@ -114,6 +115,17 @@ CHANNELS."
(channel-instance channel commit checkout)))
channels))
+(define* (checkout->channel-instance checkout
+ #:key commit
+ (url checkout) (name 'guix))
+ "Return a channel instance for CHECKOUT, which is assumed to be a checkout
+of COMMIT at URL. Use NAME as the channel name."
+ (let* ((commit (or commit (make-string 40 #\0)))
+ (channel (channel (name name)
+ (commit commit)
+ (url url))))
+ (channel-instance channel commit checkout)))
+
(define %self-build-file
;; The file containing code to build Guix. This serves the same purpose as
;; a makefile, and, similarly, is intended to always keep this name.
- branch master updated (01e7ca5 -> e91152e), guix-commits, 2018/11/28
- 03/07: status: Report grafting derivations specially., guix-commits, 2018/11/28
- 02/07: grafts: Record metadata as derivation properties., guix-commits, 2018/11/28
- 01/07: derivations: Add properties., guix-commits, 2018/11/28
- 04/07: ui: 'show-what-to-build' reports grafts separately., guix-commits, 2018/11/28
- 06/07: channels: Add 'checkout->channel-instance'.,
guix-commits <=
- 07/07: guix hash: Fix version and help messages, guix-commits, 2018/11/28
- 05/07: inferior: Add 'inferior-eval-with-store'., guix-commits, 2018/11/28