Mercurial > hg > xemacs-beta

comparison lisp/prim/obsolete.el @ 142:1856695b1fa9 r20-2b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-2b5
author cvs
date Mon, 13 Aug 2007 09:33:18 +0200
parents 8619ce7e4c50
children 59463afc5666
comparison
equal deleted inserted replaced
141:ea67ad3963dc 142:1856695b1fa9
44 as provided for compatibility only." 44 as provided for compatibility only."
45 (define-function oldfun newfun) 45 (define-function oldfun newfun)
46 (make-compatible oldfun newfun)) 46 (make-compatible oldfun newfun))
47 47
48 (defsubst define-obsolete-variable-alias (oldvar newvar) 48 (defsubst define-obsolete-variable-alias (oldvar newvar)
49 "Define OLDVAR as an obsolete alias for varction NEWVAR. 49 "Define OLDVAR as an obsolete alias for variable NEWVAR.
50 This makes referencing or setting OLDVAR equivalent to referencing or 50 This makes referencing or setting OLDVAR equivalent to referencing or
51 setting NEWVAR and marks OLDVAR as obsolete." 51 setting NEWVAR and marks OLDVAR as obsolete."
52 (defvaralias oldvar newvar) 52 (defvaralias oldvar newvar)
53 (make-obsolete-variable oldvar newvar)) 53 (make-obsolete-variable oldvar newvar))
54 54
55 (defsubst define-compatible-variable-alias (oldvar newvar) 55 (defsubst define-compatible-variable-alias (oldvar newvar)
56 "Define OLDVAR as a compatible alias for varction NEWVAR. 56 "Define OLDVAR as a compatible alias for variable NEWVAR.
57 This makes referencing or setting OLDVAR equivalent to referencing or 57 This makes referencing or setting OLDVAR equivalent to referencing or
58 setting NEWVAR and marks OLDVAR as provided for compatibility only." 58 setting NEWVAR and marks OLDVAR as provided for compatibility only."
59 (defvaralias oldvar newvar) 59 (defvaralias oldvar newvar)
60 (make-compatible-variable oldvar newvar)) 60 (make-compatible-variable oldvar newvar))
61 61