Mercurial > emacs
comparison lisp/subr.el @ 61996:18c0da616450
(define-function, sref): Remove aliases and obsolete
declarations.
(chars-in-region): Remove obsolete declaration.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Sun, 01 May 2005 22:18:14 +0000 |
parents | cb3d882b9349 |
children | e208ebaf0e17 |
comparison
equal
deleted
inserted
replaced
61995:eaf711995ea5 | 61996:18c0da616450 |
---|---|
758 (defalias 'read-input 'read-string) | 758 (defalias 'read-input 'read-string) |
759 (defalias 'send-string 'process-send-string) | 759 (defalias 'send-string 'process-send-string) |
760 (defalias 'send-region 'process-send-region) | 760 (defalias 'send-region 'process-send-region) |
761 (defalias 'show-buffer 'set-window-buffer) | 761 (defalias 'show-buffer 'set-window-buffer) |
762 (defalias 'eval-current-buffer 'eval-buffer) | 762 (defalias 'eval-current-buffer 'eval-buffer) |
763 (defalias 'define-function 'defalias) | 763 |
764 | |
765 (defalias 'sref 'aref) | |
766 (make-obsolete 'sref 'aref "20.4") | |
767 (make-obsolete 'char-bytes "now always returns 1." "20.4") | 764 (make-obsolete 'char-bytes "now always returns 1." "20.4") |
768 (make-obsolete 'chars-in-region "use (abs (- BEG END))." "20.3") | |
769 (make-obsolete 'baud-rate "use the `baud-rate' variable instead." "before 19.15") | 765 (make-obsolete 'baud-rate "use the `baud-rate' variable instead." "before 19.15") |
770 (make-obsolete 'define-function 'defalias "20.1") | |
771 | 766 |
772 (defun insert-string (&rest args) | 767 (defun insert-string (&rest args) |
773 "Mocklisp-compatibility insert function. | 768 "Mocklisp-compatibility insert function. |
774 Like the function `insert' except that any argument that is a number | 769 Like the function `insert' except that any argument that is a number |
775 is converted into a string by expressing it in decimal." | 770 is converted into a string by expressing it in decimal." |