2 files changed, 10 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a0791284bca..7ce4ad1a3ac 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2014-03-09  Juri Linkov  <juri@jurta.org>
+
+        * ansi-color.el (ansi-color-names-vector): Copy default colors
+        from `xterm-standard-colors' that look well on the default white
+        background (and also on the black background) to avoid illegible
+        color combinations like yello-on-white and white-on-white.
+        http://lists.gnu.org/archive/html/emacs-devel/2014-02/msg00157.html
+
 2014-03-08  Juanma Barranquero  <lekktu@gmail.com>
 
         * frameset.el (frameset-restore): When no frame is visible, do not
diff --git a/lisp/ansi-color.el b/lisp/ansi-color.el
index 0ab811c7205..4a18c05a880 100644
--- a/lisp/ansi-color.el
+++ b/lisp/ansi-color.el
@@ -117,7 +117,7 @@ map.  This color map is stored in the variable `ansi-color-map'."
   :group 'ansi-colors)
 
 (defcustom ansi-color-names-vector
-  ["black" "red" "green" "yellow" "blue" "magenta" "cyan" "white"]
+  ["black" "red3" "green3" "yellow3" "blue2" "magenta3" "cyan3" "gray90"]
   "Colors used for SGR control sequences determining a color.
 This vector holds the colors used for SGR control sequences parameters
 30 to 37 (foreground colors) and 40 to 47 (background colors).
@@ -147,6 +147,7 @@ foreground and background colors, respectively."
                  (choice color (cons color color)))
   :set 'ansi-color-map-update
   :initialize 'custom-initialize-default
+  :version "24.4" ; default colors copied from `xterm-standard-colors'
   :group 'ansi-colors)
 
 (defconst ansi-color-regexp "\033\\[\\([0-9;]*m\\)"