Mercurial > emacs
changeset 111442:7094295b2a61
* lisp/emacs-lisp/cl-macs.el (extent-data, extent-face, extent-priority)
(extent-end-position, extent-start-position): Remove setf method for
non-existing functions.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 08 Nov 2010 14:09:21 -0500 |
| parents | b527d5f89f7f |
| children | 72390b0b6207 |
| files | lisp/ChangeLog lisp/emacs-lisp/cl-macs.el |
| diffstat | 2 files changed, 6 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Nov 08 01:38:47 2010 +0000 +++ b/lisp/ChangeLog Mon Nov 08 14:09:21 2010 -0500 @@ -1,3 +1,9 @@ +2010-11-08 Stefan Monnier <monnier@iro.umontreal.ca> + + * emacs-lisp/cl-macs.el (extent-data, extent-face, extent-priority) + (extent-end-position, extent-start-position): Remove setf method for + non-existing functions (bug#7319). + 2010-11-07 Stefan Monnier <monnier@iro.umontreal.ca> * emacs-lisp/smie.el: Simplify the smie-rules-function return values.
--- a/lisp/emacs-lisp/cl-macs.el Mon Nov 08 01:38:47 2010 +0000 +++ b/lisp/emacs-lisp/cl-macs.el Mon Nov 08 14:09:21 2010 -0500 @@ -1748,15 +1748,6 @@ (defsetf default-file-modes set-default-file-modes t) (defsetf default-value set-default) (defsetf documentation-property put) -(defsetf extent-data set-extent-data) -(defsetf extent-face set-extent-face) -(defsetf extent-priority set-extent-priority) -(defsetf extent-end-position (ext) (store) - (list 'progn (list 'set-extent-endpoints (list 'extent-start-position ext) - store) store)) -(defsetf extent-start-position (ext) (store) - (list 'progn (list 'set-extent-endpoints store - (list 'extent-end-position ext)) store)) (defsetf face-background (f &optional s) (x) (list 'set-face-background f x s)) (defsetf face-background-pixmap (f &optional s) (x) (list 'set-face-background-pixmap f x s))