etc: snippets: Prefill Common Lisp package names.
* etc/snippets/text-mode/guix-commit-message-add-cl-package: New file.
This commit is contained in:
parent
8307b8f184
commit
add4749917
13
etc/snippets/text-mode/guix-commit-message-add-cl-package
Normal file
13
etc/snippets/text-mode/guix-commit-message-add-cl-package
Normal file
@ -0,0 +1,13 @@
|
|||||||
|
# -*- mode: snippet -*-
|
||||||
|
# name: guix-commit-message-add-cl-package
|
||||||
|
# key: addcl
|
||||||
|
# condition: git-commit-mode
|
||||||
|
# --
|
||||||
|
gnu: Add ${1:`(with-temp-buffer
|
||||||
|
(magit-git-wash #'magit-diff-wash-diffs
|
||||||
|
"diff" "--staged")
|
||||||
|
(beginning-of-buffer)
|
||||||
|
(when (search-forward "+(define-public " nil 'noerror)
|
||||||
|
(thing-at-point 'sexp 'no-properties)))`}.
|
||||||
|
|
||||||
|
* `(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.
|
Loading…
Reference in New Issue
Block a user