tribes/guix
1
0
Fork 1
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-17 15:50:31 +02:00
Code Activity

etc: Use git-file-name if origin is git-fetch.

Browse Source 
* etc/snippets/scheme-mode/guix-origin: Use git-file-name.
This commit is contained in:
Pierre Neidhardt
2018-10-10 17:33:42 +02:00
parent 903378910e
commit d634db9401
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
etc/snippets/scheme-mode/guix-origin
View File

@@ -15,7 +15,9 @@
((equal yas-text "hg-fetch") "hg-reference...")
((equal yas-text "cvs-fetch") "cvs-reference...")
(t "(string-append \\"https://\\" version \\".tar.gz\\")"))}$0)
${1:$(cond ((member yas-text '("git-fetch" "svn-fetch" "hg-fetch" "cvs-fetch"))
${1:$(cond ((equal yas-text "git-fetch")
"(file-name (git-file-name name version))")
((member yas-text '("svn-fetch" "hg-fetch" "cvs-fetch"))
"(file-name (string-append name \\"-\\" version \\"-checkout\\"))")
(t ""))}
(sha256