(add-to-invisibility-spec, remove-from-invisibility-spec):

Rename ARG to ELEMENT.  Doc fix.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0aec646afd0d061ea6a18fa234c8b2354fe2db4a..bd943b52acd971d35eb3f7faf3d5757c2ae95f17 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -11,6 +11,11 @@
        Remove aliases and obsolete declarations.
        Back out inadvertant changes from previous commit.
 
+2005-05-01  Richard M. Stallman  <rms@gnu.org>
+
+       * subr.el (add-to-invisibility-spec, remove-from-invisibility-spec): 
+       Rename ARG to ELEMENT.  Doc fix.
+
 2005-05-01  Luc Teirlinck  <teirllm@auburn.edu>
 
        * files.el (require-final-newline): Make Custom tags consistent

diff --git a/lisp/subr.el b/lisp/subr.el
index 6418825aa446bab7fe376644b8d054daeeca5015..6dcb7869f4e17bb276a2f38c9a20e4c3af9bc8cc 100644 (file)
--- 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))))
 \f
 (defun global-set-key (key command)
   "Give KEY a global binding as COMMAND.