unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
blob eb0de677e7a3ee86bd6ff4cd6d84a0445dbae228 598 bytes (raw)
name: etc/snippets/text-mode/guix-commit-message-add-cl-package 	 # note: path name is non-authoritative(*)

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
 
# -*- 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 (re-search-forward "+(define-\\(public\\|package\\) " nil 'noerror)
                  (replace-regexp-in-string
		   "^sbcl-" ""
		   (thing-at-point 'sexp 'no-properties))))`}.

* `(car (magit-staged-files))` (cl-${1:$(replace-regexp-in-string "^cl-" "" yas-text)}, ecl-$1, sbcl-$1): New variables.

debug log:

solving eb0de677e7 ...
found eb0de677e7 in https://yhetil.org/guix-patches/15d01b32313f5f2f291b120597719ae92bd26acd.1630639896.git.iskarian@mgsn.dev/
found e255736b05 in https://git.savannah.gnu.org/cgit/guix.git
preparing index
index prepared:
100644 e255736b0588e51be18af7633ac65692b0180d15	etc/snippets/text-mode/guix-commit-message-add-cl-package

applying [1/1] https://yhetil.org/guix-patches/15d01b32313f5f2f291b120597719ae92bd26acd.1630639896.git.iskarian@mgsn.dev/
diff --git a/etc/snippets/text-mode/guix-commit-message-add-cl-package b/etc/snippets/text-mode/guix-commit-message-add-cl-package
index e255736b05..eb0de677e7 100644

Checking patch etc/snippets/text-mode/guix-commit-message-add-cl-package...
Applied patch etc/snippets/text-mode/guix-commit-message-add-cl-package cleanly.

index at:
100644 eb0de677e7a3ee86bd6ff4cd6d84a0445dbae228	etc/snippets/text-mode/guix-commit-message-add-cl-package

(*) Git path names are given by the tree(s) the blob belongs to.
    Blobs themselves have no identifier aside from the hash of its contents.^

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).