blob b763a3292650169f3664709f3049d8e1613d61f7 1276 bytes (raw)
name: etc/snippets/scheme-mode/guix-origin # note: path name is non-authoritative(*)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
| | # -*- mode: snippet -*-
# name: guix-origin
# key: origin...
# --
(origin
(method ${1:$$(yas-choose-value "url-fetch"
"url-fetch/tarbomb"
"url-fetch/zipbomb"
"cvs-fetch"
"git-fetch"
"hg-fetch"
"svn-fetch"
"bzr-fetch")})
(uri ${1:$(cond ((equal yas-text "git-fetch") "git-reference...")
((equal yas-text "svn-fetch") "svn-reference...")
((equal yas-text "hg-fetch") "hg-reference...")
((equal yas-text "cvs-fetch") "cvs-reference...")
((equal yas-text "bzr-fetch") "bzr-reference...")
(t "(string-append \\"https://\\" version \\".tar.gz\\")"))}$0)
${1:$(cond ((equal yas-text "git-fetch")
"(file-name (git-file-name name version))")
((equal yas-text "hg-fetch")
"(file-name (hg-file-name name version))")
((member yas-text '("svn-fetch" "hg-fetch" "cvs-fetch" "bzr-fetch"))
"(file-name (string-append name \\"-\\" version \\"-checkout\\"))")
(t ""))}
(sha256
(base32
"$2")))
|
debug log:
solving b763a32926 ...
found b763a32926 in https://yhetil.org/guix-patches/725dd8ab7a1c9628d425c52f18be5e1ff54cfe2d.1624206584.git.public@yoctocell.xyz/
found 2820a369f3 in https://git.savannah.gnu.org/cgit/guix.git
preparing index
index prepared:
100644 2820a369f31ccd9657d31ce4be14d32737dc6a8b etc/snippets/scheme-mode/guix-origin
applying [1/1] https://yhetil.org/guix-patches/725dd8ab7a1c9628d425c52f18be5e1ff54cfe2d.1624206584.git.public@yoctocell.xyz/
diff --git a/etc/snippets/scheme-mode/guix-origin b/etc/snippets/scheme-mode/guix-origin
index 2820a369f3..b763a32926 100644
Checking patch etc/snippets/scheme-mode/guix-origin...
Applied patch etc/snippets/scheme-mode/guix-origin cleanly.
index at:
100644 b763a3292650169f3664709f3049d8e1613d61f7 etc/snippets/scheme-mode/guix-origin
(*) Git path names are given by the tree(s) the blob belongs to.
Blobs themselves have no identifier aside from the hash of its contents.^
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).