Mercurial > emacs

comparison lisp/subr.el @ 24245:418feab1639c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Dan Nicolaescu <done@ece.arizona.edu>
date Tue, 02 Feb 1999 02:26:12 +0000
parents 70954a8be49b
children ca77d79a0c21
comparison
equal deleted inserted replaced
24244:1139bb78dcfa 24245:418feab1639c
1162 (setq buffer-invisibility-spec 1162 (setq buffer-invisibility-spec
1163 (cons arg buffer-invisibility-spec))))) 1163 (cons arg buffer-invisibility-spec)))))
1164 1164
1165 (defun remove-from-invisibility-spec (arg) 1165 (defun remove-from-invisibility-spec (arg)
1166 "Remove elements from `buffer-invisibility-spec'." 1166 "Remove elements from `buffer-invisibility-spec'."
1167 (if buffer-invisibility-spec 1167 (if (consp buffer-invisibility-spec)
1168 (setq buffer-invisibility-spec (delete arg buffer-invisibility-spec)))) 1168 (setq buffer-invisibility-spec (delete arg buffer-invisibility-spec))))
1169 1169
1170 (defun global-set-key (key command) 1170 (defun global-set-key (key command)
1171 "Give KEY a global binding as COMMAND. 1171 "Give KEY a global binding as COMMAND.
1172 COMMAND is the command definition to use; usually it is 1172 COMMAND is the command definition to use; usually it is