Mercurial > emacs
changeset 61970:cb3d882b9349
(add-to-invisibility-spec, remove-from-invisibility-spec):
Rename ARG to ELEMENT. Doc fix.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 01 May 2005 13:57:43 +0000 |
| parents | 38ca28ee68d6 |
| children | 214d314c49cb |
| files | lisp/subr.el |
| diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Sun May 01 13:43:20 2005 +0000 +++ b/lisp/subr.el Sun May 01 13:57:43 2005 +0000 @@ -2275,19 +2275,19 @@ If SYNTAX is nil, return nil." (and syntax (logand (car syntax) 65535))) -(defun add-to-invisibility-spec (arg) - "Add elements to `buffer-invisibility-spec'. +(defun add-to-invisibility-spec (element) + "Add ELEMENT to `buffer-invisibility-spec'. See documentation for `buffer-invisibility-spec' for the kind of elements that can be added." (if (eq buffer-invisibility-spec t) (setq buffer-invisibility-spec (list t))) (setq buffer-invisibility-spec - (cons arg buffer-invisibility-spec))) + (cons element buffer-invisibility-spec))) -(defun remove-from-invisibility-spec (arg) - "Remove elements from `buffer-invisibility-spec'." +(defun remove-from-invisibility-spec (element) + "Remove ELEMENT from `buffer-invisibility-spec'." (if (consp buffer-invisibility-spec) - (setq buffer-invisibility-spec (delete arg buffer-invisibility-spec)))) + (setq buffer-invisibility-spec (delete element buffer-invisibility-spec)))) (defun global-set-key (key command) "Give KEY a global binding as COMMAND.