[Emacs-diffs] /srv/bzr/emacs/trunk r110888: * lisp/emacs-lisp/gv.el (setf): Fix debug spec for multiple assignments.

[Stefan Monnier]

------------------------------------------------------------
revno: 110888
fixes bug: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=12879
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Tue 2012-11-13 20:12:52 -0500
message:
  * lisp/emacs-lisp/gv.el (setf): Fix debug spec for multiple assignments.
modified:
  lisp/ChangeLog
  lisp/emacs-lisp/gv.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-11-13 18:57:26 +0000
+++ b/lisp/ChangeLog    2012-11-14 01:12:52 +0000
@@ -1,3 +1,8 @@
+2012-11-14  Stefan Monnier  <address@hidden>
+
+       * emacs-lisp/gv.el (setf): Fix debug spec for multiple assignments
+       (bug#12879).
+
 2012-11-13  Dmitry Gutov  <address@hidden>
 
        * progmodes/ruby-mode.el (ruby-move-to-block): Looks for a block

=== modified file 'lisp/emacs-lisp/gv.el'
--- a/lisp/emacs-lisp/gv.el     2012-11-13 02:25:59 +0000
+++ b/lisp/emacs-lisp/gv.el     2012-11-14 01:12:52 +0000
@@ -236,7 +236,7 @@
 The return value is the last VAL in the list.
 
 \(fn PLACE VAL PLACE VAL ...)"
-  (declare (debug (gv-place form)))
+  (declare (debug (&rest [gv-place form])))
   (if (and args (null (cddr args)))
       (let ((place (pop args))
             (val (car args)))