emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/buttercup bff022e664 1/3: Use the name instead of the symb


From: ELPA Syncer
Subject: [nongnu] elpa/buttercup bff022e664 1/3: Use the name instead of the symbol in *-define-matcher-for-*-function
Date: Sun, 16 Oct 2022 18:58:22 -0400 (EDT)

branch: elpa/buttercup
commit bff022e6645af803f80e549ee031adf62ca4cea5
Author: Ola Nilsson <ola.nilsson@gmail.com>
Commit: Ola Nilsson <ola.nilsson@gmail.com>

    Use the name instead of the symbol in *-define-matcher-for-*-function
    
    Changes in GNU Emacs commit 5281946fbf6b3cdbec5ce82e0057c71849faf4d2
    makes format-spec call any symbol functions instead of inserting them
    as strings.
    
    Fixes #225.
---
 buttercup.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/buttercup.el b/buttercup.el
index 7908870a9e..5423096ee8 100644
--- a/buttercup.el
+++ b/buttercup.el
@@ -345,7 +345,7 @@ See also `buttercup-define-matcher'."
                  (concat expect-match-phrase " "
                          expect-mismatch-phrase))))
       (if (symbolp function)
-          (setq function-name function)
+          (setq function-name (symbol-name function))
         (error "The `:function-name' keyword is required if FUNCTION is not a 
symbol")))
     `(buttercup-define-matcher ,matcher (arg)
        (let* ((expr (buttercup--enclosed-expr arg))
@@ -421,7 +421,7 @@ See also `buttercup-define-matcher'."
                  (concat expect-match-phrase " "
                          expect-mismatch-phrase))))
       (if (symbolp function)
-          (setq function-name function)
+          (setq function-name (symbol-name function))
         (error "The `:function-name' keyword is required if FUNCTION is not a 
symbol")))
     `(buttercup-define-matcher ,matcher (a b)
        (cl-destructuring-bind



reply via email to

[Prev in Thread] Current Thread [Next in Thread]