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

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

[elpa] externals/setup 320de07: Fix setter generator for (append ...) an


From: ELPA Syncer
Subject: [elpa] externals/setup 320de07: Fix setter generator for (append ...) and (prepend ...)
Date: Tue, 13 Jul 2021 05:57:19 -0400 (EDT)

branch: externals/setup
commit 320de07bd88173d1d55a3f7da6d6b78d076752d0
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Fix setter generator for (append ...) and (prepend ...)
---
 setup.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/setup.el b/setup.el
index 86570e3..cd205de 100644
--- a/setup.el
+++ b/setup.el
@@ -241,7 +241,7 @@ and VAL into one s-expression."
           (cadr name)
           (let ((sym (gensym)))
             `(let ((,sym ,val)
-                   (list ,(funcall old-val-fn name)))
+                   (list ,(funcall old-val-fn (cadr name))))
                (if (member ,sym list)
                    list
                  (append list (list ,sym)))))))
@@ -250,7 +250,7 @@ and VAL into one s-expression."
           (cadr name)
           (let ((sym (gensym)))
             `(let ((,sym ,val)
-                   (list ,(funcall old-val-fn name)))
+                   (list ,(funcall old-val-fn (cadr name))))
                (if (member ,sym list)
                    list
                  (cons ,sym list))))))



reply via email to

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