etc/snippets/text-mode/guix-commit-message-add-cl-package

   1 # -*- mode: snippet -*-
   2 # name: guix-commit-message-add-cl-package
   3 # key: addcl
   4 # condition: git-commit-mode
   5 # --
   6 gnu: Add ${1:`(with-temp-buffer
   7                 (magit-git-wash #'magit-diff-wash-diffs
   8                   "diff" "--staged")
   9                 (beginning-of-buffer)
  10                 (when (search-forward "+(define-public " nil 'noerror)
  11                   (thing-at-point 'sexp 'no-properties)))`}.
  12
  13 * `(car (magit-staged-files))` (${1:$(replace-regexp-in-string (rx line-start "sbcl" (optional "-cl")) "cl" yas-text)}, ${1:$(replace-regexp-in-string "^sbcl" "ecl" yas-text)}, $1): New variables.