# HG changeset patch # User scop # Date 1031031412 0 # Node ID a28c97bd4634029d33f6f1ddc7c322d9ceb7e3f7 # Parent 4700aface1abf5982bc91409dad773a777defca2 [xemacs-hg @ 2002-09-03 05:36:51 by scop] 2002-09-02 Ville Skyttä * bytecomp-runtime.el (make-obsolete): Docstring argument nit. (make-obsolete-variable): Ditto. (make-compatible): Ditto. (make-compatible-variable): Ditto. diff -r 4700aface1ab -r a28c97bd4634 lisp/ChangeLog --- a/lisp/ChangeLog Tue Sep 03 02:32:12 2002 +0000 +++ b/lisp/ChangeLog Tue Sep 03 05:36:52 2002 +0000 @@ -1,3 +1,10 @@ +2002-09-02 Ville Skyttä + + * bytecomp-runtime.el (make-obsolete): Docstring argument nit. + (make-obsolete-variable): Ditto. + (make-compatible): Ditto. + (make-compatible-variable): Ditto. + 2002-07-12 Andy Piper * custom.el (custom-theme-set-variables): remove bogus diff -r 4700aface1ab -r a28c97bd4634 lisp/bytecomp-runtime.el --- a/lisp/bytecomp-runtime.el Tue Sep 03 02:32:12 2002 +0000 +++ b/lisp/bytecomp-runtime.el Tue Sep 03 05:36:52 2002 +0000 @@ -93,7 +93,7 @@ ; ''byte-optimizer ''byte-compile-inline-expand)))) (defun make-obsolete (fn new) - "Make the byte-compiler warn that FUNCTION is obsolete. + "Make the byte-compiler warn that function FN is obsolete. The warning will say that NEW should be used instead. If NEW is a string, that is the `use instead' message." (interactive "aMake function obsolete: \nxObsoletion replacement: ") @@ -105,7 +105,7 @@ fn) (defun make-obsolete-variable (var new) - "Make the byte-compiler warn that VARIABLE is obsolete, + "Make the byte-compiler warn that variable VAR is obsolete, and NEW should be used instead. If NEW is a string, then that is the `use instead' message." (interactive @@ -120,7 +120,7 @@ ;; By overwhelming demand, we separate out truly obsolete symbols from ;; those that are present for GNU Emacs compatibility. (defun make-compatible (fn new) - "Make the byte-compiler know that FUNCTION is provided for compatibility. + "Make the byte-compiler know that function FN is provided for compatibility. The warning will say that NEW should be used instead. If NEW is a string, that is the `use instead' message." (interactive "aMake function compatible: \nxCompatible replacement: ") @@ -132,7 +132,7 @@ fn) (defun make-compatible-variable (var new) - "Make the byte-compiler know that VARIABLE is provided for compatibility. + "Make the byte-compiler know that variable VAR is provided for compatibility, and NEW should be used instead. If NEW is a string, then that is the `use instead' message." (interactive