diff options
| author | Richard M. Stallman <rms@gnu.org> | 2005-05-01 13:58:45 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2005-05-01 13:58:45 +0000 |
| commit | 648d174d393745a73c0656653d8317c644acc60f (patch) | |
| tree | b963dd5c7d72e31dba659fed2b302e121813c18c /lisp/subr.el | |
| parent | bff05d9ea2f28b76f5c0d45370ad7ab39ad61a86 (diff) | |
| download | emacs-648d174d393745a73c0656653d8317c644acc60f.tar.gz | |
(add-to-invisibility-spec, remove-from-invisibility-spec):
Rename ARG to ELEMENT. Doc fix.
Diffstat (limited to 'lisp/subr.el')
| -rw-r--r-- | lisp/subr.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 6418825aa44..6dcb7869f4e 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -2275,19 +2275,19 @@ If POS is outside the buffer's accessible portion, return nil." 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. |