# -*- mode: snippet -*-
# name: guix-commit-message-unstable-tarball
# key: tarball
# condition: git-commit-mode
# --
gnu: $1: Don't use unstable tarball.

* `(car (magit-staged-files))` ($1): Modify package to use stable git references.
`(with-temp-buffer
   (magit-git-wash #'magit-diff-wash-diffs
     "diff" "--staged")
   (beginning-of-buffer)
   (when (search-forward "(method git-fetch" nil 'noerror)
     (print "[source]: Use GIT-FETCH.")))`
`(with-temp-buffer
   (magit-git-wash #'magit-diff-wash-diffs
     "diff" "--staged")
   (beginning-of-buffer)
   (when (search-forward "(file-name (git-file-name" nil 'noerror)
     (print "[source]: Use GIT-FILE-NAME.")))`