01/02: etc: snippets: Fix package name extraction.

[guix-commits]

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