diff options
author | Pierre Neidhardt <mail@ambrevar.xyz> | 2020-11-10 10:02:44 +0100 |
---|---|---|
committer | Pierre Neidhardt <mail@ambrevar.xyz> | 2020-11-23 11:13:58 +0100 |
commit | 8307b8f184d59f69b66292ae1137997caa50cb15 (patch) | |
tree | d2a944afa44957269a4504fbdda0978f52472fae | |
parent | f942c09b663c3a48a1ae22ae96b69aabc323fd31 (diff) |
etc: snippets: Fix package name extraction.
* etc/snippets/text-mode/guix-commit-message-add-package: Properly extract
name when the diff contains a very short `define-public ...` above the actual
new package. This can happen when the above package is a small inherited
definition or cl/ecl package.
-rw-r--r-- | etc/snippets/text-mode/guix-commit-message-add-package | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/etc/snippets/text-mode/guix-commit-message-add-package b/etc/snippets/text-mode/guix-commit-message-add-package index 0dff2cbcf5..e54a06de7e 100644 --- a/etc/snippets/text-mode/guix-commit-message-add-package +++ b/etc/snippets/text-mode/guix-commit-message-add-package @@ -7,7 +7,7 @@ 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) + (when (search-forward "+(define-public " nil 'noerror) (thing-at-point 'sexp 'no-properties)))`}. * `(car (magit-staged-files))` ($1): New variable.
\ No newline at end of file |