From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 1 May 2005 13:58:45 +0000 (+0000)
Subject: (add-to-invisibility-spec, remove-from-invisibility-spec):
X-Git-Tag: ttn-vms-21-2-B4~627
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=648d174d393745a73c0656653d8317c644acc60f;p=emacs.git

(add-to-invisibility-spec, remove-from-invisibility-spec):
Rename ARG to ELEMENT.  Doc fix.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0aec646afd0..bd943b52acd 100644
--- 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 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.