Mercurial > emacs
changeset 49687:c2ff7876bd60
(process-get): Add setf method.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 10 Feb 2003 21:45:14 +0000 |
| parents | 64195811ff44 |
| children | 372d20665473 |
| files | lisp/emacs-lisp/cl-macs.el |
| diffstat | 1 files changed, 1 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl-macs.el Mon Feb 10 21:44:24 2003 +0000 +++ b/lisp/emacs-lisp/cl-macs.el Mon Feb 10 21:45:14 2003 +0000 @@ -1724,6 +1724,7 @@ (defsetf process-buffer set-process-buffer) (defsetf process-filter set-process-filter) (defsetf process-sentinel set-process-sentinel) +(defsetf process-get process-put) (defsetf read-mouse-position (scr) (store) (list 'set-mouse-position scr (list 'car store) (list 'cdr store))) (defsetf screen-height set-screen-height t)