# HG changeset patch
# User Johan Bockg���rd <bojohan@gnu.org>
# Date 1207041642 0
# Node ID 448527b69d4a2037b89ed43f6f8a37ec7fbedc8e
# Parent  b97d6aea2d959e2ed5b357771381f545404c555d
(frame-parameter) <defsetf>: Make it return the assigned value.

diff -r b97d6aea2d95 -r 448527b69d4a lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Apr 01 08:36:57 2008 +0000
+++ b/lisp/ChangeLog	Tue Apr 01 09:20:42 2008 +0000
@@ -1,3 +1,8 @@
+2008-04-01  Johan Bockgård  <bojohan@gnu.org>
+
+	* emacs-lisp/cl-macs.el (frame-parameter) <defsetf>: Make it
+	return the assigned value.
+
 2008-04-01  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* abbrev.el (abbrev-mode): Use define-minor-mode.
diff -r b97d6aea2d95 -r 448527b69d4a lisp/emacs-lisp/cl-macs.el
--- a/lisp/emacs-lisp/cl-macs.el	Tue Apr 01 08:36:57 2008 +0000
+++ b/lisp/emacs-lisp/cl-macs.el	Tue Apr 01 09:20:42 2008 +0000
@@ -1757,7 +1757,7 @@
 (defsetf frame-parameters modify-frame-parameters t)
 (defsetf frame-visible-p cl-set-frame-visible-p)
 (defsetf frame-width set-screen-width t)
-(defsetf frame-parameter set-frame-parameter)
+(defsetf frame-parameter set-frame-parameter t)
 (defsetf getenv setenv t)
 (defsetf get-register set-register)
 (defsetf global-key-binding global-set-key)