Mercurial > emacs
changeset 62452:dc7a3585340d
(window-dot, set-window-dot, read-input, send-string, send-region, show-buffer,
eval-current-buffer): Make really obsolete, as the comment says.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 18 May 2005 07:43:48 +0000 |
| parents | ee6bad3fbaf7 |
| children | 7cbec0bdb2b6 |
| files | lisp/subr.el |
| diffstat | 1 files changed, 8 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Tue May 17 22:40:00 2005 +0000 +++ b/lisp/subr.el Wed May 18 07:43:48 2005 +0000 @@ -753,16 +753,16 @@ ;;;; Obsolescent names for functions. -(defalias 'window-dot 'window-point) -(defalias 'set-window-dot 'set-window-point) -(defalias 'read-input 'read-string) -(defalias 'send-string 'process-send-string) -(defalias 'send-region 'process-send-region) -(defalias 'show-buffer 'set-window-buffer) -(defalias 'eval-current-buffer 'eval-buffer) +(define-obsolete-function-alias 'window-dot 'window-point) +(define-obsolete-function-alias 'set-window-dot 'set-window-point) +(define-obsolete-function-alias 'read-input 'read-string) +(define-obsolete-function-alias 'send-string 'process-send-string) +(define-obsolete-function-alias 'send-region 'process-send-region) +(define-obsolete-function-alias 'show-buffer 'set-window-buffer) +(define-obsolete-function-alias 'eval-current-buffer 'eval-buffer) +(define-obsolete-function-alias 'string-to-int 'string-to-number) (make-obsolete 'char-bytes "now always returns 1." "20.4") -(define-obsolete-function-alias 'string-to-int 'string-to-number) (defun insert-string (&rest args) "Mocklisp-compatibility insert function.