2017-12-15 22:10:54 +00:00
|
|
|
# -*- 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"
|
2018-11-21 04:11:29 +00:00
|
|
|
"svn-fetch"
|
|
|
|
|
"bzr-fetch")})
|
2017-12-15 22:10:54 +00:00
|
|
|
(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...")
|
2018-11-21 04:11:29 +00:00
|
|
|
((equal yas-text "bzr-fetch") "bzr-reference...")
|
2017-12-15 22:10:54 +00:00
|
|
|
(t "(string-append \\"https://\\" version \\".tar.gz\\")"))}$0)
|
2018-10-10 15:33:42 +00:00
|
|
|
${1:$(cond ((equal yas-text "git-fetch")
|
|
|
|
|
"(file-name (git-file-name name version))")
|
2021-06-20 18:44:44 +00:00
|
|
|
((equal yas-text "hg-fetch")
|
|
|
|
|
"(file-name (hg-file-name name version))")
|
|
|
|
|
((member yas-text '("svn-fetch" "cvs-fetch" "bzr-fetch"))
|
2017-12-15 22:10:54 +00:00
|
|
|
"(file-name (string-append name \\"-\\" version \\"-checkout\\"))")
|
|
|
|
|
(t ""))}
|
|
|
|
|
(sha256
|
|
|
|
|
(base32
|
|
|
|
|
"$2")))
|
