Mercurial > hg > xemacs-beta
comparison lisp/prim/obsolete.el @ 207:e45d5e7c476e r20-4b2
Import from CVS: tag r20-4b2
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 10:03:52 +0200 |
| parents | acd284d43ca1 |
| children |
comparison
equal
deleted
inserted
replaced
| 206:d3e9274cbc4e | 207:e45d5e7c476e |
|---|---|
| 613 on the system; white is (65280 65280 65280) or (65535 65535 65535). | 613 on the system; white is (65280 65280 65280) or (65535 65535 65535). |
| 614 If FRAME is omitted or nil, use the selected frame." | 614 If FRAME is omitted or nil, use the selected frame." |
| 615 (color-instance-rgb-components (make-color-instance color))) | 615 (color-instance-rgb-components (make-color-instance color))) |
| 616 (make-compatible 'x-color-values 'color-instance-rgb-components) | 616 (make-compatible 'x-color-values 'color-instance-rgb-components) |
| 617 | 617 |
| 618 ;; The name of char-int is unintuitive and silly, but in CLtL2. | |
| 619 (define-compatible-function-alias 'char-int 'char-to-int) | |
| 620 ;; likewise with int-char. | |
| 621 (define-compatible-function-alias 'int-char 'int-to-char) | |
| 622 | |
| 623 ;; Two loser functions which shouldn't be used. | 618 ;; Two loser functions which shouldn't be used. |
| 624 (make-obsolete 'following-char 'char-after) | 619 (make-obsolete 'following-char 'char-after) |
| 625 (make-obsolete 'preceding-char 'char-before) | 620 (make-obsolete 'preceding-char 'char-before) |
| 626 | 621 |
| 627 | 622 |
| 692 (make-obsolete 'truncate-string 'truncate-string-to-width) | 687 (make-obsolete 'truncate-string 'truncate-string-to-width) |
| 693 | 688 |
| 694 ;; Keywords already do The Right Thing in XEmacs | 689 ;; Keywords already do The Right Thing in XEmacs |
| 695 (make-compatible 'define-widget-keywords "Just use them") | 690 (make-compatible 'define-widget-keywords "Just use them") |
| 696 | 691 |
| 692 (make-obsolete 'function-called-at-point 'function-at-point) | |
| 693 | |
| 697 ;;; obsolete.el ends here | 694 ;;; obsolete.el ends here |