[Emacs-diffs] /srv/bzr/emacs/trunk r100371: * emacs-lisp/cl-macs.el (window-parameter): Add defsetf with

[Juri Linkov]

------------------------------------------------------------
revno: 100371
committer: Juri Linkov <address@hidden>
branch nick: trunk
timestamp: Wed 2010-05-19 23:37:57 +0300
message:
  * emacs-lisp/cl-macs.el (window-parameter): Add defsetf with
  set-window-parameter.
modified:
  lisp/ChangeLog
  lisp/emacs-lisp/cl-macs.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-05-19 18:56:18 +0000
+++ b/lisp/ChangeLog    2010-05-19 20:37:57 +0000
@@ -1,3 +1,8 @@
+2010-05-19  Juri Linkov  <address@hidden>
+
+       * emacs-lisp/cl-macs.el (window-parameter): Add defsetf with
+       set-window-parameter.
+
 2010-05-19  Michael Albinus  <address@hidden>
 
        * net/tramp.el (tramp-methods): Add `tramp-async-args' attribute

=== modified file 'lisp/emacs-lisp/cl-macs.el'
--- a/lisp/emacs-lisp/cl-macs.el        2010-05-05 03:45:21 +0000
+++ b/lisp/emacs-lisp/cl-macs.el        2010-05-19 20:37:57 +0000
@@ -1813,6 +1813,7 @@
 (defsetf window-height () (store)
   (list 'progn (list 'enlarge-window (list '- store '(window-height))) store))
 (defsetf window-hscroll set-window-hscroll)
+(defsetf window-parameter set-window-parameter)
 (defsetf window-point set-window-point)
 (defsetf window-start set-window-start)
 (defsetf window-width () (store)