Index: emacs/lisp/facemenu.el
diff -c emacs/lisp/facemenu.el:1.83 emacs/lisp/facemenu.el:1.84
*** emacs/lisp/facemenu.el:1.83 Mon Jul 4 23:08:54 2005
--- emacs/lisp/facemenu.el Sun Jul 10 17:20:02 2005
***************
*** 475,484 ****
;;;###autoload
(defun facemenu-read-color (&optional prompt)
"Read a color using the minibuffer."
! (let ((col (completing-read (or prompt "Color: ")
! (or facemenu-color-alist
! (defined-colors))
! nil t)))
(if (equal "" col)
nil
col)))
--- 475,485 ----
;;;###autoload
(defun facemenu-read-color (&optional prompt)
"Read a color using the minibuffer."
! (let* ((completion-ignore-case t)
! (col (completing-read (or prompt "Color: ")
! (or facemenu-color-alist
! (defined-colors))
! nil t)))
(if (equal "" col)
nil
col)))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
