[Emacs-diffs] /srv/bzr/emacs/trunk r103369: * themes/tango-dark-theme.el: Tweak background on low-color terminals.

[Chong Yidong]

------------------------------------------------------------
revno: 103369
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Mon 2011-02-21 00:59:20 -0500
message:
  * themes/tango-dark-theme.el: Tweak background on low-color terminals.
modified:
  etc/ChangeLog
  etc/themes/tango-dark-theme.el

=== modified file 'etc/ChangeLog'
--- a/etc/ChangeLog     2011-02-17 21:47:18 +0000
+++ b/etc/ChangeLog     2011-02-21 05:59:20 +0000
@@ -1,3 +1,8 @@
+2011-02-21  Chong Yidong  <address@hidden>
+
+       * themes/tango-dark-theme.el: Tweak background on low-color
+       terminals.
+
 2011-02-17  Ken Manheimer  <address@hidden>
 
        * etc/images/icons/allout-widgets/dark-bg,

=== modified file 'etc/themes/tango-dark-theme.el'
--- a/etc/themes/tango-dark-theme.el    2011-01-25 04:08:28 +0000
+++ b/etc/themes/tango-dark-theme.el    2011-02-21 05:59:20 +0000
@@ -49,7 +49,13 @@
 
   (custom-theme-set-faces
    'tango-dark
-   `(default ((,class (:foreground ,alum-1 :background ,alum-6))))
+   ;; Ensure sufficient contrast on low-color terminals.
+   `(default ((((class color) (min-colors 4096))
+              (:foreground ,alum-1 :background ,alum-6))
+             (((class color) (min-colors 256))
+              (:foreground ,alum-1 :background "#222"))
+             (,class
+              (:foreground ,alum-1 :background "black"))))
    `(cursor ((,class (:foreground ,alum-6 :background ,butter-1))))
    ;; Highlighting faces
    `(fringe ((,class (:background ,alum-7))))