[Emacs-diffs] Changes to emacs/lisp/subr.el,v

[Vinicius Jose Latorre]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Vinicius Jose Latorre <viniciusjl>      07/04/09 23:10:00

Index: subr.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/subr.el,v
retrieving revision 1.551
retrieving revision 1.552
diff -u -b -r1.551 -r1.552
--- subr.el     6 Apr 2007 12:15:04 -0000       1.551
+++ subr.el     9 Apr 2007 23:10:00 -0000       1.552
@@ -949,8 +949,12 @@
 ;;;; Obsolescence declarations for variables, and aliases.
 
 (make-obsolete-variable 'directory-sep-char "do not use it." "21.1")
-(make-obsolete-variable 'mode-line-inverse-video "use the appropriate faces 
instead." "21.1")
-(make-obsolete-variable 'unread-command-char
+(make-obsolete-variable
+ 'mode-line-inverse-video
+ "use the appropriate faces instead."
+ "21.1")
+(make-obsolete-variable
+ 'unread-command-char
   "use `unread-command-events' instead.  That variable is a list of events
 to reread, so it now uses nil to mean `no event', instead of -1."
   "before 19.15")
@@ -960,9 +964,11 @@
                              "before 19.34")
 
 (defvaralias 'x-lost-selection-hooks 'x-lost-selection-functions)
-(make-obsolete-variable 'x-lost-selection-hooks 'x-lost-selection-functions 
"22.1")
+(make-obsolete-variable 'x-lost-selection-hooks
+                       'x-lost-selection-functions "22.1")
 (defvaralias 'x-sent-selection-hooks 'x-sent-selection-functions)
-(make-obsolete-variable 'x-sent-selection-hooks 'x-sent-selection-functions 
"22.1")
+(make-obsolete-variable 'x-sent-selection-hooks
+                       'x-sent-selection-functions "22.1")
 
 (defvaralias 'messages-buffer-max-lines 'message-log-max)
 
@@ -1553,7 +1559,8 @@
 
 ;; compatibility
 
-(make-obsolete 'process-kill-without-query
+(make-obsolete
+ 'process-kill-without-query
                "use `process-query-on-exit-flag' or 
`set-process-query-on-exit-flag'."
                "22.1")
 (defun process-kill-without-query (process &optional flag)
@@ -2833,7 +2840,8 @@
 (defun remove-from-invisibility-spec (element)
   "Remove ELEMENT from `buffer-invisibility-spec'."
   (if (consp buffer-invisibility-spec)
-    (setq buffer-invisibility-spec (delete element buffer-invisibility-spec))))
+      (setq buffer-invisibility-spec
+           (delete element buffer-invisibility-spec))))
 
 ;;;; Syntax tables.