Mercurial > hg > xemacs-beta

comparison lisp/prim/obsolete.el @ 110:fe104dbd9147 r20-1b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b7
author cvs
date Mon, 13 Aug 2007 09:19:45 +0200
parents 360340f9fd5f
children 8619ce7e4c50
comparison
equal deleted inserted replaced
109:e183fc049578 110:fe104dbd9147
606 on the system; white is (65280 65280 65280) or (65535 65535 65535). 606 on the system; white is (65280 65280 65280) or (65535 65535 65535).
607 If FRAME is omitted or nil, use the selected frame." 607 If FRAME is omitted or nil, use the selected frame."
608 (color-instance-rgb-components (make-color-instance color))) 608 (color-instance-rgb-components (make-color-instance color)))
609 (make-compatible 'x-color-values 'color-instance-rgb-components) 609 (make-compatible 'x-color-values 'color-instance-rgb-components)
610 610
611 ;; The name of char-int is unintuitive and silly. 611 ;; The name of char-int is unintuitive and silly, but in CLtL2.
612 (define-obsolete-function-alias 'char-int 'char-to-int) 612 (define-compatible-function-alias 'char-int 'char-to-int)
613 ;; likewise with int-char. 613 ;; likewise with int-char.
614 (define-obsolete-function-alias 'int-char 'int-to-char) 614 (define-compatible-function-alias 'int-char 'int-to-char)
615 615
616 ;;; obsolete.el ends here 616 ;;; obsolete.el ends here