# -*- mode: snippet -*- # name: guix-vc-commit-message-use-https-home-page # key: https # -- gnu: ${1:`(when (string-match "^[ ]*(define-public \\(\\S-+\\)" vc-patch-string) (match-string-no-properties 1 vc-patch-string))`}: Use HTTPS home page URI. * `(car (log-edit-files))` ($1)[home-page]: Use HTTPS URI. `(mapconcat (lambda (file) (concat "* " file)) (cdr (log-edit-files)) "\n")`