[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/02: etc: snippets: Fix package name extraction.
From: |
guix-commits |
Subject: |
01/02: etc: snippets: Fix package name extraction. |
Date: |
Mon, 23 Nov 2020 05:16:33 -0500 (EST) |
ambrevar pushed a commit to branch master
in repository guix.
commit 8307b8f184d59f69b66292ae1137997caa50cb15
Author: Pierre Neidhardt <mail@ambrevar.xyz>
AuthorDate: Tue Nov 10 10:02:44 2020 +0100
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.
---
etc/snippets/text-mode/guix-commit-message-add-package | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/etc/snippets/text-mode/guix-commit-message-add-package
b/etc/snippets/text-mode/guix-commit-message-add-package
index 0dff2cb..e54a06d 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