[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/term/tty-colors.el [emacs-unicode-2]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/term/tty-colors.el [emacs-unicode-2] |
Date: |
Wed, 28 Jul 2004 03:09:29 -0400 |
Index: emacs/lisp/term/tty-colors.el
diff -c emacs/lisp/term/tty-colors.el:1.11.8.1
emacs/lisp/term/tty-colors.el:1.11.8.2
*** emacs/lisp/term/tty-colors.el:1.11.8.1 Fri Apr 16 12:50:36 2004
--- emacs/lisp/term/tty-colors.el Wed Jul 28 07:05:50 2004
***************
*** 864,878 ****
(if (< mag 1) 0 (acos (/ (+ r g b) mag)))))
(defun tty-color-approximate (rgb &optional frame)
! "Given a list of 3 rgb values in RGB, find the color in `tty-color-alist'
! which is the best approximation in the 3-dimensional RGB space,
! and return its description.
!
! Value is a list of the form \(NAME INDEX R G B\). Note that the returned
! NAME is not necessarily the same string as the argument COLOR, because
! the latter might need to be approximated if it is not supported directly.
!
! Each value of the RGB triplet should be in the range 0..65535 range.
FRAME defaults to the selected frame."
(let* ((color-list (tty-color-alist frame))
(candidate (car color-list))
--- 864,873 ----
(if (< mag 1) 0 (acos (/ (+ r g b) mag)))))
(defun tty-color-approximate (rgb &optional frame)
! "Find the color in `tty-color-alist' that best approximates RGB.
! Value is a list of the form \(NAME INDEX R G B\).
! The argument RGB should be an rgb value, that is, a list of three
! integers in the 0..65535 range.
FRAME defaults to the selected frame."
(let* ((color-list (tty-color-alist frame))
(candidate (car color-list))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/term/tty-colors.el [emacs-unicode-2],
Miles Bader <=