Mercurial > emacs
comparison lisp/subr.el @ 55232:32822ce3259d
(remove-overlays): Docstring change.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Thu, 29 Apr 2004 18:42:24 +0000 |
parents | 4c64ee838f41 |
children | 3b27c2f86c7a |
comparison
equal
deleted
inserted
replaced
55231:7fc34677dcb8 | 55232:32822ce3259d |
---|---|
1529 o1)) | 1529 o1)) |
1530 | 1530 |
1531 (defun remove-overlays (&optional beg end name val) | 1531 (defun remove-overlays (&optional beg end name val) |
1532 "Clear BEG and END of overlays whose property NAME has value VAL. | 1532 "Clear BEG and END of overlays whose property NAME has value VAL. |
1533 Overlays might be moved and or split. | 1533 Overlays might be moved and or split. |
1534 If BEG is nil, `(point-min)' is used. If END is nil, `(point-max)' | 1534 BEG and END default to the beginning resp. end of buffer." |
1535 is used." | |
1536 (unless beg (setq beg (point-min))) | 1535 (unless beg (setq beg (point-min))) |
1537 (unless end (setq end (point-max))) | 1536 (unless end (setq end (point-max))) |
1538 (if (< end beg) | 1537 (if (< end beg) |
1539 (setq beg (prog1 end (setq end beg)))) | 1538 (setq beg (prog1 end (setq end beg)))) |
1540 (save-excursion | 1539 (save-excursion |