From 42cdcdff1945b112452029c6a79445aac15ffd16 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Fri, 15 Dec 2017 23:10:54 +0100 Subject: etc: Add snippets. * etc/snippets/scheme-mode/guix-cvs-reference, etc/snippets/scheme-mode/guix-git-reference, etc/snippets/scheme-mode/guix-hg-reference, etc/snippets/scheme-mode/guix-origin, etc/snippets/scheme-mode/guix-package, etc/snippets/scheme-mode/guix-svn-reference, etc/snippets/text-mode/guix-commit-message-add-package, etc/snippets/text-mode/guix-commit-message-update-package: New files. * doc/contributing.texi (The Perfect Setup): Document snippets. --- etc/snippets/scheme-mode/guix-origin | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 etc/snippets/scheme-mode/guix-origin (limited to 'etc/snippets/scheme-mode/guix-origin') diff --git a/etc/snippets/scheme-mode/guix-origin b/etc/snippets/scheme-mode/guix-origin new file mode 100644 index 0000000000..68d47135db --- /dev/null +++ b/etc/snippets/scheme-mode/guix-origin @@ -0,0 +1,23 @@ +# -*- 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")}) + (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...") + (t "(string-append \\"https://\\" version \\".tar.gz\\")"))}$0) + ${1:$(cond ((member yas-text '("git-fetch" "svn-fetch" "hg-fetch" "cvs-fetch")) + "(file-name (string-append name \\"-\\" version \\"-checkout\\"))") + (t ""))} + (sha256 + (base32 + "$2"))) \ No newline at end of file -- cgit v1.2.3