* 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.
		
			
				
	
	
		
			23 lines
		
	
	
		
			No EOL
		
	
	
		
			968 B
		
	
	
	
		
			Text
		
	
	
	
	
	
			
		
		
	
	
			23 lines
		
	
	
		
			No EOL
		
	
	
		
			968 B
		
	
	
	
		
			Text
		
	
	
	
	
	
| # -*- 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"))) |