История изменений
Исправление Zmicier, (текущая версия) :
zenburn
А правильное-то решение — исправить *тему* так, чтобы она сама прекратила применяться на тех рамках, где у нее это плохо получается...
Так, 
early_britney_fun, мне за вас, я так понял, смотреть?
«Дзенберн» — это которая Бацова, да? Ну там образцовое:
(defmacro zenburn-with-color-variables (&rest body)
"`let' bind all colors defined in `zenburn-colors-alist' around BODY.
Also bind `class' to ((class color) (min-colors 89))."
(declare (indent 0))
`(let ((class '((class color) (min-colors 89)))
...
...
`(default ((t (:foreground ,zenburn-fg :background ,zenburn-bg))))
`(cursor ((t (:foreground ,zenburn-fg :background ,zenburn-fg+1))))
`(escape-glyph ((t (:foreground ,zenburn-yellow :weight bold))))
`(fringe ((t (:foreground ,zenburn-fg :background ,zenburn-bg+1))))
^
^^^
...
Исходная версия Zmicier, :
zenburn
А правильное-то решение — исправить *тему* так, чтобы она сама прекратила применяться на тех рамках, где у нее это плохо получается...
Так, early_britney_fun, мне за вас, я там понял, смотреть?
«Дзенберн» — это которая Бацова, да? Ну там образцовое:
(defmacro zenburn-with-color-variables (&rest body)
"`let' bind all colors defined in `zenburn-colors-alist' around BODY.
Also bind `class' to ((class color) (min-colors 89))."
(declare (indent 0))
`(let ((class '((class color) (min-colors 89)))
...
...
`(default ((t (:foreground ,zenburn-fg :background ,zenburn-bg))))
`(cursor ((t (:foreground ,zenburn-fg :background ,zenburn-fg+1))))
`(escape-glyph ((t (:foreground ,zenburn-yellow :weight bold))))
`(fringe ((t (:foreground ,zenburn-fg :background ,zenburn-bg+1))))
^
^^^
...