/[emacs]/emacs/lisp/subr.el
ViewVC logotype

Diff of /emacs/lisp/subr.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.444 by nickrob, Sun May 1 13:30:19 2005 UTC revision 1.445 by rms, Sun May 1 13:57:43 2005 UTC
# Line 2275  If POS is outside the buffer's accessibl Line 2275  If POS is outside the buffer's accessibl
2275  If SYNTAX is nil, return nil."  If SYNTAX is nil, return nil."
2276    (and syntax (logand (car syntax) 65535)))    (and syntax (logand (car syntax) 65535)))
2277    
2278  (defun add-to-invisibility-spec (arg)  (defun add-to-invisibility-spec (element)
2279    "Add elements to `buffer-invisibility-spec'.    "Add ELEMENT to `buffer-invisibility-spec'.
2280  See documentation for `buffer-invisibility-spec' for the kind of elements  See documentation for `buffer-invisibility-spec' for the kind of elements
2281  that can be added."  that can be added."
2282    (if (eq buffer-invisibility-spec t)    (if (eq buffer-invisibility-spec t)
2283        (setq buffer-invisibility-spec (list t)))        (setq buffer-invisibility-spec (list t)))
2284    (setq buffer-invisibility-spec    (setq buffer-invisibility-spec
2285          (cons arg buffer-invisibility-spec)))          (cons element buffer-invisibility-spec)))
2286    
2287  (defun remove-from-invisibility-spec (arg)  (defun remove-from-invisibility-spec (element)
2288    "Remove elements from `buffer-invisibility-spec'."    "Remove ELEMENT from `buffer-invisibility-spec'."
2289    (if (consp buffer-invisibility-spec)    (if (consp buffer-invisibility-spec)
2290      (setq buffer-invisibility-spec (delete arg buffer-invisibility-spec))))      (setq buffer-invisibility-spec (delete element buffer-invisibility-spec))))
2291    
2292  (defun global-set-key (key command)  (defun global-set-key (key command)
2293    "Give KEY a global binding as COMMAND.    "Give KEY a global binding as COMMAND.

Legend:
Removed from v.1.444  
changed lines
  Added in v.1.445

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26