Mercurial > emacs
changeset 17073:5e66b1087c94
Change put-text-property with constant args to add-text-properties for efficiency. Suggested by Stavros Macrakis <s.macrakis@opengroup.org>
| author | Boris Goldowsky <boris@gnu.org> |
|---|---|
| date | Mon, 24 Feb 1997 17:47:07 +0000 |
| parents | b14c67f044a6 |
| children | 16f59b060f93 |
| files | lisp/facemenu.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/facemenu.el Sun Feb 23 22:49:18 1997 +0000 +++ b/lisp/facemenu.el Mon Feb 24 17:47:07 1997 +0000 @@ -360,7 +360,7 @@ This sets the `invisible' text property; it can be undone with `facemenu-remove-special'." (interactive "r") - (put-text-property start end 'invisible t)) + (add-text-properties start end '(invisible t))) ;;;###autoload (defun facemenu-set-intangible (start end) @@ -368,7 +368,7 @@ This sets the `intangible' text property; it can be undone with `facemenu-remove-special'." (interactive "r") - (put-text-property start end 'intangible t)) + (add-text-properties start end '(intangible t))) ;;;###autoload (defun facemenu-set-read-only (start end) @@ -376,7 +376,7 @@ This sets the `read-only' text property; it can be undone with `facemenu-remove-special'." (interactive "r") - (put-text-property start end 'read-only t)) + (add-text-properties start end '(read-only t))) ;;;###autoload (defun facemenu-remove-props (start end)