[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/byte-run.el

[Nick Roberts]

Index: emacs/lisp/emacs-lisp/byte-run.el
diff -c emacs/lisp/emacs-lisp/byte-run.el:1.8 
emacs/lisp/emacs-lisp/byte-run.el:1.9
*** emacs/lisp/emacs-lisp/byte-run.el:1.8       Mon Mar 14 14:05:13 2005
--- emacs/lisp/emacs-lisp/byte-run.el   Fri Apr 22 04:08:08 2005
***************
*** 129,134 ****
--- 129,146 ----
    (put variable 'byte-obsolete-variable (cons new when))
    variable)
  
+ (defmacro define-obsolete-variable-alias (variable new
+                                                &optional when docstring)
+   "Make VARIABLE a variable alias for NEW and warn that VARIABLE is obsolete.
+ If provided, WHEN should be a string indicating when VARIABLE was
+ first made obsolete, for example a date or a release number.  The
+ optional argument DOCSTRING specifies the documentation string
+ for VARIABLE; if DOCSTRING is omitted or nil, VARIABLE uses the
+ documentation string of NEW unless it already has one."
+   `(progn
+      (defvaralias ,variable ,new ,docstring)
+       (make-obsolete-variable ,variable ,new ,when)))
+ 
  (defmacro dont-compile (&rest body)
    "Like `progn', but the body always runs interpreted (not compiled).
  If you think you need this, you're probably making a mistake somewhere."