emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] /srv/bzr/emacs/emacs-24 r110810: * lisp/emacs-lisp/gv.el (


From: Stefan Monnier
Subject: [Emacs-diffs] /srv/bzr/emacs/emacs-24 r110810: * lisp/emacs-lisp/gv.el (gv-define-simple-setter): Fix last change.
Date: Wed, 07 Nov 2012 20:24:14 -0500
User-agent: Bazaar (2.5.0)

------------------------------------------------------------
revno: 110810
fixes bug: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=12812
committer: Stefan Monnier <address@hidden>
branch nick: emacs-24
timestamp: Wed 2012-11-07 20:24:14 -0500
message:
  * lisp/emacs-lisp/gv.el (gv-define-simple-setter): Fix last change.
modified:
  lisp/ChangeLog
  lisp/emacs-lisp/gv.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-11-07 20:43:38 +0000
+++ b/lisp/ChangeLog    2012-11-08 01:24:14 +0000
@@ -1,3 +1,8 @@
+2012-11-08  Stefan Monnier  <address@hidden>
+
+       * emacs-lisp/gv.el (gv-define-simple-setter): Fix last change
+       (bug#12812).
+
 2012-11-07  Chong Yidong  <address@hidden>
 
        * minibuf-eldef.el (minibuffer-eldef-shorten-default): Convert to

=== modified file 'lisp/emacs-lisp/gv.el'
--- a/lisp/emacs-lisp/gv.el     2012-11-07 04:37:07 +0000
+++ b/lisp/emacs-lisp/gv.el     2012-11-08 01:24:14 +0000
@@ -220,7 +220,8 @@
   `(gv-define-setter ,name (val &rest args)
      ,(if fix-return
           `(macroexp-let2 nil v val
-             (cons ',setter (append args (list v))))
+             (cons ',setter (append args (list v)))
+             v)
         `(cons ',setter (append args (list val))))))
 
 ;;; Typical operations on generalized variables.


reply via email to

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