unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#23366: 25.0.93; Custom font still not saved
@ 2016-04-25  6:00 PEDRO ANDRES ARANDA GUTIERREZ
  2016-04-25  7:38 ` Eli Zaretskii
  0 siblings, 1 reply; 10+ messages in thread
From: PEDRO ANDRES ARANDA GUTIERREZ @ 2016-04-25  6:00 UTC (permalink / raw)
  To: 23366

[-- Attachment #1: Type: text/plain, Size: 6877 bytes --]



Already reported in 25.0.92.
I set the custom file according to the OS I'm running emacs on, using the following code:

(defun window-system-name()
  (if (display-graphic-p)
 (cond
  ((eq system-type 'gnu/linux) "x")
  ((eq system-type 'darwin) "mac")
  ((eq system-type 'berkeley-unix) "bsd")
  (t (progn (error "Unsupported window-system") nil)))
"nox"))
(setq window-environment (window-system-name))
(setq custom-file (format "~/.emacs.d/%s-custom.el" window-environment))
(load custom-file 'noerror)

When I set the font through
Options->Set Default Font
The font will be changed for the session. However, when I try to save it with
Options->Save Options

It will not be saved in .emacs.d/$SYSTEM-custom.el

Actually, the custom-set-faces command will be empty. Happens on all systems.


In GNU Emacs 25.0.93.1 (x86_64-apple-darwin15.4.0, NS appkit-1404.46 Version 10.11.4 (Build 15E65))
of 2016-04-25 built on paag.hi.inet
Windowing system distributor 'Apple', version 10.3.1404
Configured using:
'configure --disable-dependency-tracking --disable-silent-rules
--enable-locallisppath=/usr/local/share/emacs/site-lisp
--infodir=/usr/local/Cellar/emacs/25.0.93/share/info/emacs
--prefix=/usr/local/Cellar/emacs/25.0.93 --with-xml2 --with-dbus
--without-gnutls --with-ns --disable-ns-self-contained'

Configured features:
JPEG DBUS NOTIFY ACL LIBXML2 ZLIB TOOLKIT_SCROLL_BARS NS

Important settings:
  value of $LC_ALL: C
  value of $LC_CTYPE: es_ES.UTF-8
  value of $LANG: es_ES.UTF-8
  locale-coding-system: utf-8

Major mode: Lisp Interaction

Minor modes in effect:
  global-hl-line-mode: t
  yas-global-mode: t
  yas-minor-mode: t
  show-paren-mode: t
  server-mode: t
  global-linum-mode: t
  linum-mode: t
  tooltip-mode: t
  global-eldoc-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  size-indication-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent messages:
Loading /Volumes/Macintosh-HD/Users/paag/.emacs.d/functions.el (source)...done
Loading /Volumes/Macintosh-HD/Users/paag/.emacs.d/narrow-xml.el (source)...done
Loading /Volumes/Macintosh-HD/Users/paag/.emacs.d/modes.el (source)...done
Loading /Volumes/Macintosh-HD/Users/paag/.emacs.d/hooks.el (source)...done
Loading /Volumes/Macintosh-HD/Users/paag/.emacs.d/c-hook.el (source)...done
Loading /Volumes/Macintosh-HD/Users/paag/.emacs.d/tex-hook.el (source)...done
Loading /Volumes/Macintosh-HD/Users/paag/.emacs.d/keymaps.el (source)...done
Restarting server
For information about GNU Emacs and the GNU system, type C-h C-a.
Making completion list... [5 times]

Load-path shadows:
~/.emacs.d/elpa/markdown-mode-20160312.2335/markdown-mode hides ~/.emacs.d/lisp/markdown-mode

Features:
(shadow sort flyspell ispell mail-extr emacsbug message dired
format-spec rfc822 mailabbrev gmm-utils mailheader sendmail edmacro
kmacro doxygen re-builder base16-ashes-dark-theme hl-line mediawiki
derived url-cache ring mm-url gnus gnus-ems nnheader mail-utils wid-edit
mml mml-sec epg mm-decode mm-bodies mm-encode url-http tls gnutls url
url-proxy url-privacy url-expand url-methods url-history mailcap
url-auth mail-parse rfc2231 rfc2047 rfc2045 ietf-drums url-cookie
url-domsuf url-util url-parse auth-source eieio eieio-core gnus-util
mm-util help-fns mail-prsvr password-cache url-gw url-vars linum-ex
cl-macs easy-mmode cl-seq yasnippet cl finder-inf package epg-config seq
byte-opt gv bytecomp byte-compile cl-extra help-mode easymenu cconv
cl-loaddefs pcase cl-lib paren server linum cus-start cus-load time-date
mule-util tooltip eldoc electric uniquify ediff-hook vc-hooks
lisp-float-type mwheel ns-win ucs-normalize term/common-win tool-bar dnd
fontset image regexp-opt fringe tabulated-list newcomment elisp-mode
lisp-mode prog-mode register page menu-bar rfn-eshadow timer select
scroll-bar mouse jit-lock font-lock syntax facemenu font-core frame
cl-generic cham georgian utf-8-lang misc-lang vietnamese tibetan thai
tai-viet lao korean japanese eucjp-ms cp51932 hebrew greek romanian
slovak czech european ethiopic indian cyrillic chinese charscript
case-table epa-hook jka-cmpr-hook help simple abbrev minibuffer
cl-preloaded nadvice loaddefs button faces cus-face macroexp files
text-properties overlay sha1 md5 base64 format env code-pages mule
custom widget hashtable-print-readable backquote dbusbind kqueue cocoa
ns multi-tty make-network-process emacs)

Memory information:
((conses 16 319156 10672)
(symbols 48 29943 6)
(miscs 40 86 295)
(strings 32 47463 9515)
(string-bytes 1 1239510)
(vectors 16 42624)
(vector-slots 8 776761 3869)
(floats 8 273 106)
(intervals 56 275 0)
(buffers 976 13))

---
Dr. Pedro A. Aranda Gutiérrez

Technology Exploration -
Network Innovation & Virtualisation
email: pedroa d0t aranda At telefonica d0t com
Telefónica, Investigación y Desarrollo
C/ Zurbarán,12
28010 Madrid, Spain

Fragen sind nicht da, um beantwortet zu werden.
Fragen sind da, um gestellt zu werden.
Georg Kreisler


________________________________

Este mensaje y sus adjuntos se dirigen exclusivamente a su destinatario, puede contener información privilegiada o confidencial y es para uso exclusivo de la persona o entidad de destino. Si no es usted. el destinatario indicado, queda notificado de que la lectura, utilización, divulgación y/o copia sin autorización puede estar prohibida en virtud de la legislación vigente. Si ha recibido este mensaje por error, le rogamos que nos lo comunique inmediatamente por esta misma vía y proceda a su destrucción.

The information contained in this transmission is privileged and confidential information intended only for the use of the individual or entity named above. If the reader of this message is not the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this transmission in error, do not read it. Please immediately reply to the sender that you have received this communication in error and then delete it.

Esta mensagem e seus anexos se dirigem exclusivamente ao seu destinatário, pode conter informação privilegiada ou confidencial e é para uso exclusivo da pessoa ou entidade de destino. Se não é vossa senhoria o destinatário indicado, fica notificado de que a leitura, utilização, divulgação e/ou cópia sem autorização pode estar proibida em virtude da legislação vigente. Se recebeu esta mensagem por erro, rogamos-lhe que nos o comunique imediatamente por esta mesma via e proceda a sua destruição

[-- Attachment #2: Type: text/html, Size: 10400 bytes --]

^ permalink raw reply	[flat|nested] 10+ messages in thread

* bug#23366: 25.0.93; Custom font still not saved
  2016-04-25  6:00 bug#23366: 25.0.93; Custom font still not saved PEDRO ANDRES ARANDA GUTIERREZ
@ 2016-04-25  7:38 ` Eli Zaretskii
  2016-04-25  7:45   ` PEDRO ANDRES ARANDA GUTIERREZ
  0 siblings, 1 reply; 10+ messages in thread
From: Eli Zaretskii @ 2016-04-25  7:38 UTC (permalink / raw)
  To: PEDRO ANDRES ARANDA GUTIERREZ; +Cc: 23366

> From: PEDRO ANDRES ARANDA GUTIERREZ <pedroa.aranda@telefonica.com>
> Date: Mon, 25 Apr 2016 06:00:18 +0000
> 
> Already reported in 25.0.92.

Could you please point out where this was reported?  I couldn't find it.

> I set the custom file according to the OS I'm running emacs on, using the following code:
> 
> (defun window-system-name()
> (if (display-graphic-p)
> (cond
> ((eq system-type 'gnu/linux) "x")
> ((eq system-type 'darwin) "mac")
> ((eq system-type 'berkeley-unix) "bsd")
> (t (progn (error "Unsupported window-system") nil)))
> "nox"))
> (setq window-environment (window-system-name))
> (setq custom-file (format "~/.emacs.d/%s-custom.el" window-environment))
> (load custom-file 'noerror)
> 
> When I set the font through
> Options->Set Default Font
> The font will be changed for the session. However, when I try to save it with
> Options->Save Options
> 
> It will not be saved in .emacs.d/$SYSTEM-custom.el
> 
> Actually, the custom-set-faces command will be empty. Happens on all systems.

I cannot reproduce this on my system (MS-Windows) with the latest
emacs-25 branch and with stock Emacs 25.0.93.  When I set custom-file
to some file name, then select "Set Default Font" from the menu bar,
and finally click "Options->Save Options", I see a message in the echo
area saying that the custom-file was written (it shows the exact name
I set custom-file to), and in the custom-file I see this part:

  (custom-set-faces
   ;; custom-set-faces was added by Custom.
   ;; If you edit it by hand, you could mess it up, so be careful.
   ;; Your init file should contain only one such instance.
   ;; If there is more than one, they won't work right.
   '(default ((t (:family "Arial Unicode MS" :foundry "outline" :slant normal :weight normal :height 98 :width normal)))))

(Arial Unicode MS is the font I selected.)

So there's something else in your customizations or your init files
that prevents this from working.  Please look closer at those
customizations and try to find the culprit.

Thanks.





^ permalink raw reply	[flat|nested] 10+ messages in thread

* bug#23366: 25.0.93; Custom font still not saved
  2016-04-25  7:38 ` Eli Zaretskii
@ 2016-04-25  7:45   ` PEDRO ANDRES ARANDA GUTIERREZ
  2016-04-25  7:56     ` Eli Zaretskii
  0 siblings, 1 reply; 10+ messages in thread
From: PEDRO ANDRES ARANDA GUTIERREZ @ 2016-04-25  7:45 UTC (permalink / raw)
  To: Eli Zaretskii; +Cc: 23366@debbugs.gnu.org

Answers inline,



-----Mensaje original-----
De: Eli Zaretskii <eliz@gnu.org>
Responder a: Eli Zaretskii <eliz@gnu.org>
Fecha: lunes, 25 de abril de 2016, 9:38
Para: paag <pedroa.aranda@telefonica.com>
CC: "23366@debbugs.gnu.org" <23366@debbugs.gnu.org>
Asunto: Re: bug#23366: 25.0.93; Custom font still not saved

>> From: PEDRO ANDRES ARANDA GUTIERREZ <pedroa.aranda@telefonica.com>
>> Date: Mon, 25 Apr 2016 06:00:18 +0000
>>
>> Already reported in 25.0.92.
>
>Could you please point out where this was reported?  I couldn't find it.

bug#22939: Acknowledgement (25.0.92; Font management for Mac OSX broken)

Also happens in Linux and BSD with all kinds of distress...

>> I set the custom file according to the OS I'm running emacs on, using the following code:
>>
>> (defun window-system-name()
>> (if (display-graphic-p)
>> (cond
>> ((eq system-type 'gnu/linux) "x")
>> ((eq system-type 'darwin) "mac")
>> ((eq system-type 'berkeley-unix) "bsd")
>> (t (progn (error "Unsupported window-system") nil)))
>> "nox"))
>> (setq window-environment (window-system-name))
>> (setq custom-file (format "~/.emacs.d/%s-custom.el" window-environment))
>> (load custom-file 'noerror)
>>
>> When I set the font through
>> Options->Set Default Font
>> The font will be changed for the session. However, when I try to save it with
>> Options->Save Options
>>
>> It will not be saved in .emacs.d/$SYSTEM-custom.el
>>
>> Actually, the custom-set-faces command will be empty. Happens on all systems.
>
>I cannot reproduce this on my system (MS-Windows) with the latest
>emacs-25 branch and with stock Emacs 25.0.93.  When I set custom-file
>to some file name, then select "Set Default Font" from the menu bar,
>and finally click "Options->Save Options", I see a message in the echo
>area saying that the custom-file was written (it shows the exact name
>I set custom-file to), and in the custom-file I see this part:
>
>  (custom-set-faces
>   ;; custom-set-faces was added by Custom.
>   ;; If you edit it by hand, you could mess it up, so be careful.
>   ;; Your init file should contain only one such instance.
>   ;; If there is more than one, they won't work right.
>   '(default ((t (:family "Arial Unicode MS" :foundry "outline" :slant normal :weight normal :height 98 :width normal)))))
>
>(Arial Unicode MS is the font I selected.)
>
>So there's something else in your customizations or your init files
>that prevents this from working.  Please look closer at those
>customizations and try to find the culprit.
>
>Thanks.

________________________________

Este mensaje y sus adjuntos se dirigen exclusivamente a su destinatario, puede contener información privilegiada o confidencial y es para uso exclusivo de la persona o entidad de destino. Si no es usted. el destinatario indicado, queda notificado de que la lectura, utilización, divulgación y/o copia sin autorización puede estar prohibida en virtud de la legislación vigente. Si ha recibido este mensaje por error, le rogamos que nos lo comunique inmediatamente por esta misma vía y proceda a su destrucción.

The information contained in this transmission is privileged and confidential information intended only for the use of the individual or entity named above. If the reader of this message is not the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this transmission in error, do not read it. Please immediately reply to the sender that you have received this communication in error and then delete it.

Esta mensagem e seus anexos se dirigem exclusivamente ao seu destinatário, pode conter informação privilegiada ou confidencial e é para uso exclusivo da pessoa ou entidade de destino. Se não é vossa senhoria o destinatário indicado, fica notificado de que a leitura, utilização, divulgação e/ou cópia sem autorização pode estar proibida em virtude da legislação vigente. Se recebeu esta mensagem por erro, rogamos-lhe que nos o comunique imediatamente por esta mesma via e proceda a sua destruição

^ permalink raw reply	[flat|nested] 10+ messages in thread

* bug#23366: 25.0.93; Custom font still not saved
  2016-04-25  7:45   ` PEDRO ANDRES ARANDA GUTIERREZ
@ 2016-04-25  7:56     ` Eli Zaretskii
  2016-04-25  8:53       ` Eli Zaretskii
  0 siblings, 1 reply; 10+ messages in thread
From: Eli Zaretskii @ 2016-04-25  7:56 UTC (permalink / raw)
  To: PEDRO ANDRES ARANDA GUTIERREZ; +Cc: 23366

> From: PEDRO ANDRES ARANDA GUTIERREZ <pedroa.aranda@telefonica.com>
> CC: "23366@debbugs.gnu.org" <23366@debbugs.gnu.org>
> Date: Mon, 25 Apr 2016 07:45:00 +0000
> >> Already reported in 25.0.92.
> >
> >Could you please point out where this was reported?  I couldn't find it.
> 
> bug#22939: Acknowledgement (25.0.92; Font management for Mac OSX broken)
> 
> Also happens in Linux and BSD with all kinds of distress...

Thanks.  Well, as I said, it doesn't reproduce on MS-Windows for me,
and I don't have access to any other system where I can run a GUI
session.

Can anyone else please try reproducing this on a system other than OS X?





^ permalink raw reply	[flat|nested] 10+ messages in thread

* bug#23366: 25.0.93; Custom font still not saved
  2016-04-25  7:56     ` Eli Zaretskii
@ 2016-04-25  8:53       ` Eli Zaretskii
  2016-04-26 19:19         ` Glenn Morris
  0 siblings, 1 reply; 10+ messages in thread
From: Eli Zaretskii @ 2016-04-25  8:53 UTC (permalink / raw)
  To: pedroa.aranda; +Cc: 23366

> Date: Mon, 25 Apr 2016 10:56:35 +0300
> From: Eli Zaretskii <eliz@gnu.org>
> Cc: 23366@debbugs.gnu.org
> 
> Can anyone else please try reproducing this on a system other than OS X?

For that matter, can someone explain why OS X could be special in this
regard?  AFAICT, the code involved in this is system-independent.





^ permalink raw reply	[flat|nested] 10+ messages in thread

* bug#23366: 25.0.93; Custom font still not saved
  2016-04-25  8:53       ` Eli Zaretskii
@ 2016-04-26 19:19         ` Glenn Morris
  2016-04-27  7:33           ` PEDRO ANDRES ARANDA GUTIERREZ
  2016-04-28 17:39           ` Glenn Morris
  0 siblings, 2 replies; 10+ messages in thread
From: Glenn Morris @ 2016-04-26 19:19 UTC (permalink / raw)
  To: Eli Zaretskii; +Cc: pedroa.aranda, 23366

Eli Zaretskii wrote:

>> Can anyone else please try reproducing this on a system other than OS X?
>
> For that matter, can someone explain why OS X could be special in this
> regard?  AFAICT, the code involved in this is system-independent.

But the OP says it happens on all systems (OS X, Linux, BSD)
(which seems odd to me).

Anyway, reproduced on a GNUstep build (only) on GNU/Linux.

"Set Default Font" uses ns-popup-font-panel, which does not appear to
add the 'customized-face property to the default face, so
menu-bar-options-save finds nothing to do. Probably related, it only
changes the current frame, not all frames.

In fact, this is good old http://debbugs.gnu.org/2845





^ permalink raw reply	[flat|nested] 10+ messages in thread

* bug#23366: 25.0.93; Custom font still not saved
  2016-04-26 19:19         ` Glenn Morris
@ 2016-04-27  7:33           ` PEDRO ANDRES ARANDA GUTIERREZ
  2016-04-27 16:39             ` Glenn Morris
  2016-04-28 17:39           ` Glenn Morris
  1 sibling, 1 reply; 10+ messages in thread
From: PEDRO ANDRES ARANDA GUTIERREZ @ 2016-04-27  7:33 UTC (permalink / raw)
  To: Glenn Morris, Eli Zaretskii; +Cc: 23366@debbugs.gnu.org

[-- Attachment #1: Type: text/plain, Size: 3325 bytes --]

Hi folks,

I found the culprit… I’m using the attached base16-* theme. When I put it as my ~/.emacs.d/init.el file, I can’t customise the font neither from the ‘Options->Set Default Font’ menu item for from M-x customize-faces -> default.

I use the same .emacs.d infrastructure across systems, and the error is consistent in all of them.

Best, /PA

---
Dr. Pedro A. Aranda Gutiérrez

Technology Exploration -
Network Innovation & Virtualisation
email: pedroa d0t aranda At telefonica d0t com
Telefónica, Investigación y Desarrollo
C/ Zurbarán,12
28010 Madrid, Spain

Fragen sind nicht da, um beantwortet zu werden.
Fragen sind da, um gestellt zu werden.
Georg Kreisler









-----Mensaje original-----
De: Glenn Morris <rgm@gnu.org>
Fecha: martes, 26 de abril de 2016, 21:19
Para: Eli Zaretskii <eliz@gnu.org>
CC: paag <pedroa.aranda@telefonica.com>, "23366@debbugs.gnu.org" <23366@debbugs.gnu.org>
Asunto: Re: bug#23366: 25.0.93; Custom font still not saved

>Eli Zaretskii wrote:
>
>>> Can anyone else please try reproducing this on a system other than OS X?
>>
>> For that matter, can someone explain why OS X could be special in this
>> regard?  AFAICT, the code involved in this is system-independent.
>
>But the OP says it happens on all systems (OS X, Linux, BSD)
>(which seems odd to me).
>
>Anyway, reproduced on a GNUstep build (only) on GNU/Linux.
>
>"Set Default Font" uses ns-popup-font-panel, which does not appear to
>add the 'customized-face property to the default face, so
>menu-bar-options-save finds nothing to do. Probably related, it only
>changes the current frame, not all frames.
>
>In fact, this is good old http://debbugs.gnu.org/2845

________________________________

Este mensaje y sus adjuntos se dirigen exclusivamente a su destinatario, puede contener información privilegiada o confidencial y es para uso exclusivo de la persona o entidad de destino. Si no es usted. el destinatario indicado, queda notificado de que la lectura, utilización, divulgación y/o copia sin autorización puede estar prohibida en virtud de la legislación vigente. Si ha recibido este mensaje por error, le rogamos que nos lo comunique inmediatamente por esta misma vía y proceda a su destrucción.

The information contained in this transmission is privileged and confidential information intended only for the use of the individual or entity named above. If the reader of this message is not the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this transmission in error, do not read it. Please immediately reply to the sender that you have received this communication in error and then delete it.

Esta mensagem e seus anexos se dirigem exclusivamente ao seu destinatário, pode conter informação privilegiada ou confidencial e é para uso exclusivo da pessoa ou entidade de destino. Se não é vossa senhoria o destinatário indicado, fica notificado de que a leitura, utilização, divulgação e/ou cópia sem autorização pode estar proibida em virtude da legislação vigente. Se recebeu esta mensagem por erro, rogamos-lhe que nos o comunique imediatamente por esta mesma via e proceda a sua destruição

[-- Attachment #2: base16-ashes-dark-theme.el --]
[-- Type: application/octet-stream, Size: 26208 bytes --]

;; Base16 Ashes (https://github.com/chriskempson/base16)
;; Scheme: Jannik Siebert (https://github.com/janniks)

;;; base16-ashes-dark-theme.el

;;; Code:

(deftheme base16-ashes-dark)

(let ((base00 "#1C2023")
      (base01 "#393F45")
      (base02 "#565E65")
      (base03 "#747C84")
      (base04 "#ADB3BA")
      (base05 "#C7CCD1")
      (base06 "#DFE2E5")
      (base07 "#F3F4F5")
      (base08 "#C7AE95")
      (base09 "#C7C795")
      (base0A "#AEC795")
      (base0B "#95C7AE")
      (base0C "#95AEC7")
      (base0D "#AE95C7")
      (base0E "#C795AE")
      (base0F "#C79595"))

  (custom-theme-set-faces 
   'base16-ashes-dark

   ;; Built-in stuff (Emacs 23)
   `(border ((t (:background ,base03))))
   `(border-glyph ((t (nil))))
   `(cursor ((t (:background ,base08))))
   `(default ((t (:background ,base00 :foreground ,base05))))
   `(fringe ((t (:background ,base02))))
   `(gui-element ((t (:background ,base03 :foreground ,base06))))
   `(highlight ((t (:background ,base01))))
   `(link ((t (:foreground ,base0D))))
   `(link-visited ((t (:foreground ,base0E))))
   `(minibuffer-prompt ((t (:foreground ,base0D))))
   `(mode-line ((t (:background ,base02 :foreground ,base04 :box nil))))
   `(mode-line-buffer-id ((t (:foreground ,base0E :background nil))))
   `(mode-line-emphasis ((t (:foreground ,base06 :slant italic))))
   `(mode-line-highlight ((t (:foreground ,base0E :box nil :weight bold))))
   `(mode-line-inactive ((t (:background ,base01 :foreground ,base03 :box nil))))
   `(region ((t (:background ,base02))))
   `(secondary-selection ((t (:background ,base03))))
   `(error ((t (:foreground ,base08 :weight bold))))
   `(warning ((t (:foreground ,base09 :weight bold))))
   `(success ((t (:foreground ,base0B :weight bold))))

   `(header-line ((t (:inherit mode-line :foreground ,base0E :background nil))))

   ;; Font-lock stuff
   `(font-lock-builtin-face ((t (:foreground ,base0C))))
   `(font-lock-comment-delimiter-face ((t (:foreground ,base02))))
   `(font-lock-comment-face ((t (:foreground ,base03))))
   `(font-lock-constant-face ((t (:foreground ,base09))))
   `(font-lock-doc-face ((t (:foreground ,base04))))
   `(font-lock-doc-string-face ((t (:foreground ,base03))))
   `(font-lock-function-name-face ((t (:foreground ,base0D))))
   `(font-lock-keyword-face ((t (:foreground ,base0E))))
   `(font-lock-negation-char-face ((t (:foreground ,base0B))))
   `(font-lock-preprocessor-face ((t (:foreground ,base0D))))
   `(font-lock-regexp-grouping-backslash ((t (:foreground ,base0A))))
   `(font-lock-regexp-grouping-construct ((t (:foreground ,base0E))))
   `(font-lock-string-face ((t (:foreground ,base0B))))
   `(font-lock-type-face ((t (:foreground ,base0A))))
   `(font-lock-variable-name-face ((t (:foreground ,base0C))))
   `(font-lock-warning-face ((t (:foreground ,base08))))

   ;; linum-mode
   `(linum ((t (:background ,base01 :foreground ,base03))))

   ;; Search
   `(match ((t (:foreground ,base0D :background ,base01 :inverse-video t))))
   `(isearch ((t (:foreground ,base0A :background ,base01 :inverse-video t))))
   `(isearch-lazy-highlight-face ((t (:foreground ,base0C :background ,base01 :inverse-video t))))
   `(isearch-fail ((t (:background ,base01 :inherit font-lock-warning-face :inverse-video t))))
   `(evil-search-highlight-persist-highlight-face ((t (:background ,base01 :inherit font-lock-warning-face :inverse-video t))))


   ;; Popups
   `(popup-face ((t (:foreground ,base05 :background ,base02))))
   `(popup-isearch-match ((t (:foreground ,base00 :background ,base0B))))
   `(popup-scroll-bar-background-face ((t (:background ,base03))))
   `(popup-scroll-bar-foreground-face ((t (:background ,base05))))
   `(popup-summary-face ((t (:foreground ,base04))))
   `(popup-tip-face ((t (:foreground ,base00 :background ,base0A))))
   `(popup-menu-mouse-face ((t (:foreground ,base00 :background ,base0D))))
   `(popup-menu-selection-face ((t (:foreground ,base00 :background ,base0C))))

   ;; Popups
   `(popup-face ((t (:foreground ,base05 :background ,base02))))
   `(popup-isearch-match ((t (:foreground ,base00 :background ,base0B))))
   `(popup-scroll-bar-background-face ((t (:background ,base03))))
   `(popup-scroll-bar-foreground-face ((t (:background ,base05))))
   `(popup-summary-face ((t (:foreground ,base04))))
   `(popup-tip-face ((t (:foreground ,base00 :background ,base0A))))
   `(popup-menu-mouse-face ((t (:foreground ,base00 :background ,base0D))))
   `(popup-menu-selection-face ((t (:foreground ,base00 :background ,base0C))))

   ;; Flymake
   `(flymake-warnline ((t (:underline ,base09 :background ,base01))))
   `(flymake-errline ((t (:underline ,base08 :background ,base01))))

   ;; Clojure errors
   `(clojure-test-failure-face ((t (:background nil :inherit flymake-warnline))))
   `(clojure-test-error-face ((t (:background nil :inherit flymake-errline))))
   `(clojure-test-success-face ((t (:background nil :foreground nil :underline ,base0B))))

   ;; For Brian Carper's extended clojure syntax table
   `(clojure-keyword ((t (:foreground ,base0A))))
   `(clojure-parens ((t (:foreground ,base06))))
   `(clojure-braces ((t (:foreground ,base0B))))
   `(clojure-brackets ((t (:foreground ,base0A))))
   `(clojure-double-quote ((t (:foreground ,base0C :background nil))))
   `(clojure-special ((t (:foreground ,base0D))))
   `(clojure-java-call ((t (:foreground ,base0E))))

   ;; MMM-mode
   `(mmm-code-submode-face ((t (:background ,base03))))
   `(mmm-comment-submode-face ((t (:inherit font-lock-comment-face))))
   `(mmm-output-submode-face ((t (:background ,base03))))

   ;; rainbow-delimiters
   `(rainbow-delimiters-depth-1-face ((t (:foreground ,base0E))))
   `(rainbow-delimiters-depth-2-face ((t (:foreground ,base0D))))
   `(rainbow-delimiters-depth-3-face ((t (:foreground ,base0C))))
   `(rainbow-delimiters-depth-4-face ((t (:foreground ,base0B))))
   `(rainbow-delimiters-depth-5-face ((t (:foreground ,base0A))))
   `(rainbow-delimiters-depth-6-face ((t (:foreground ,base09))))
   `(rainbow-delimiters-depth-7-face ((t (:foreground ,base08))))
   `(rainbow-delimiters-depth-8-face ((t (:foreground ,base03))))
   `(rainbow-delimiters-depth-9-face ((t (:foreground ,base05))))

   ;; IDO
   `(ido-subdir ((t (:foreground ,base04))))
   `(ido-first-match ((t (:foreground ,base09 :weight bold))))
   `(ido-only-match ((t (:foreground ,base08 :weight bold))))
   `(ido-indicator ((t (:foreground ,base08 :background ,base01))))
   `(ido-virtual ((t (:foreground ,base04))))

   ;; which-function
   `(which-func ((t (:foreground ,base0D :background nil :weight bold))))

   `(trailing-whitespace ((t (:background ,base0C :foreground ,base0A))))
   `(whitespace-empty ((t (:foreground ,base08 :background ,base0A))))
   `(whitespace-hspace ((t (:background ,base04 :foreground ,base04))))
   `(whitespace-indentation ((t (:background ,base0A :foreground ,base08))))
   `(whitespace-line ((t (:background ,base01 :foreground ,base0F))))
   `(whitespace-newline ((t (:foreground ,base04))))
   `(whitespace-space ((t (:background ,base01 :foreground ,base04))))
   `(whitespace-space-after-tab ((t (:background ,base0A :foreground ,base08))))
   `(whitespace-space-before-tab ((t (:background ,base09 :foreground ,base08))))
   `(whitespace-tab ((t (:background ,base04 :foreground ,base04))))
   `(whitespace-trailing ((t (:background ,base08 :foreground ,base0A))))

   ;; Parenthesis matching (built-in)
   `(show-paren-match ((t (:background ,base0D :foreground ,base03))))
   `(show-paren-mismatch ((t (:background ,base09 :foreground ,base03))))

   ;; Pair matching (show-smartparens-mode)
   `(sp-show-pair-match-face ((t (:background ,base01 :foreground ,base05))))

   ;; Parenthesis matching (mic-paren)
   `(paren-face-match ((t (:foreground nil :background nil :inherit show-paren-match))))
   `(paren-face-mismatch ((t (:foreground nil :background nil :inherit show-paren-mismatch))))
   `(paren-face-no-match ((t (:foreground nil :background nil :inherit show-paren-mismatch))))

   ;; Parenthesis dimming (parenface)
   `(paren-face ((t (:foreground ,base04 :background nil))))

   `(sh-heredoc ((t (:foreground nil :inherit font-lock-string-face :weight normal))))
   `(sh-quoted-exec ((t (:foreground nil :inherit font-lock-preprocessor-face))))
   `(slime-highlight-edits-face ((t (:weight bold))))
   `(slime-repl-input-face ((t (:weight normal :underline nil))))
   `(slime-repl-prompt-face ((t (:underline nil :weight bold :foreground ,base0E))))
   `(slime-repl-result-face ((t (:foreground ,base0B))))
   `(slime-repl-output-face ((t (:foreground ,base0D :background ,base01))))

   `(csv-separator-face ((t (:foreground ,base09))))

   `(diff-added ((t (:foreground ,base0B))))
   `(diff-changed ((t (:foreground ,base0A))))
   `(diff-removed ((t (:foreground ,base08))))
   `(diff-header ((t (:background ,base01))))
   `(diff-file-header ((t (:background ,base02))))
   `(diff-hunk-header ((t (:background ,base01 :foreground ,base0E))))

   `(ediff-even-diff-A ((t (:foreground nil :background nil :inverse-video t))))
   `(ediff-even-diff-B ((t (:foreground nil :background nil :inverse-video t))))
   `(ediff-odd-diff-A  ((t (:foreground ,base04 :background nil :inverse-video t))))
   `(ediff-odd-diff-B  ((t (:foreground ,base04 :background nil :inverse-video t))))

   `(eldoc-highlight-function-argument ((t (:foreground ,base0B :weight bold))))

   ;; undo-tree
   `(undo-tree-visualizer-default-face ((t (:foreground ,base06))))
   `(undo-tree-visualizer-current-face ((t (:foreground ,base0B :weight bold))))
   `(undo-tree-visualizer-active-branch-face ((t (:foreground ,base08))))
   `(undo-tree-visualizer-register-face ((t (:foreground ,base0A))))

   ;; auctex
   `(font-latex-bold-face ((t (:foreground ,base0B))))
   `(font-latex-doctex-documentation-face ((t (:background ,base03))))
   `(font-latex-italic-face ((t (:foreground ,base0B))))
   `(font-latex-math-face ((t (:foreground ,base09))))
   `(font-latex-sectioning-0-face ((t (:foreground ,base0A))))
   `(font-latex-sectioning-1-face ((t (:foreground ,base0A))))
   `(font-latex-sectioning-2-face ((t (:foreground ,base0A))))
   `(font-latex-sectioning-3-face ((t (:foreground ,base0A))))
   `(font-latex-sectioning-4-face ((t (:foreground ,base0A))))
   `(font-latex-sectioning-5-face ((t (:foreground ,base0A))))
   `(font-latex-sedate-face ((t (:foreground ,base0C))))
   `(font-latex-string-face ((t (:foreground ,base0A))))
   `(font-latex-verbatim-face ((t (:foreground ,base09))))
   `(font-latex-warning-face ((t (:foreground ,base08))))

   ;; dired+
   `(diredp-compressed-file-suffix ((t (:foreground ,base0D))))
   `(diredp-dir-heading ((t (:foreground nil :background nil :inherit heading))))
   `(diredp-dir-priv ((t (:foreground ,base0C :background nil))))
   `(diredp-exec-priv ((t (:foreground ,base0D :background nil))))
   `(diredp-executable-tag ((t (:foreground ,base08 :background nil))))
   `(diredp-file-name ((t (:foreground ,base0A))))
   `(diredp-file-suffix ((t (:foreground ,base0B))))
   `(diredp-flag-mark-line ((t (:background nil :inherit highlight))))
   `(diredp-ignored-file-name ((t (:foreground ,base04))))
   `(diredp-link-priv ((t (:background nil :foreground ,base0E))))
   `(diredp-mode-line-flagged ((t (:foreground ,base08))))
   `(diredp-mode-line-marked ((t (:foreground ,base0B))))
   `(diredp-no-priv ((t (:background nil))))
   `(diredp-number ((t (:foreground ,base0A))))
   `(diredp-other-priv ((t (:background nil :foreground ,base0E))))
   `(diredp-rare-priv ((t (:foreground ,base08 :background nil))))
   `(diredp-read-priv ((t (:foreground ,base0B :background nil))))
   `(diredp-symlink ((t (:foreground ,base0E))))
   `(diredp-write-priv ((t (:foreground ,base0A :background nil))))

   ;; term and ansi-term
   `(term-color-black ((t (:foreground ,base02 :background ,base00))))
   `(term-color-white ((t (:foreground ,base05 :background ,base07))))
   `(term-color-red ((t (:foreground ,base08 :background ,base08))))
   `(term-color-yellow ((t (:foreground ,base0A :background ,base0A))))
   `(term-color-green ((t (:foreground ,base0B :background ,base0B))))
   `(term-color-cyan ((t (:foreground ,base0C :background ,base0C))))
   `(term-color-blue ((t (:foreground ,base0D :background ,base0D))))
   `(term-color-magenta ((t (:foreground ,base0E :background ,base0E))))

   `(link ((t (:foreground nil :underline t))))
   `(widget-button ((t (:underline t))))
   `(widget-field ((t (:background ,base03 :box (:line-width 1 :color ,base06)))))

   ;; Compilation (most faces politely inherit from 'success, 'error, 'warning etc.)
   `(compilation-column-number ((t (:foreground ,base0A))))
   `(compilation-line-number ((t (:foreground ,base0A))))
   `(compilation-message-face ((t (:foreground ,base0D))))
   `(compilation-mode-line-exit ((t (:foreground ,base0B))))
   `(compilation-mode-line-fail ((t (:foreground ,base08))))
   `(compilation-mode-line-run ((t (:foreground ,base0D))))

   ;; Grep
   `(grep-context-face ((t (:foreground ,base04))))
   `(grep-error-face ((t (:foreground ,base08 :weight bold :underline t))))
   `(grep-hit-face ((t (:foreground ,base0D))))
   `(grep-match-face ((t (:foreground nil :background nil :inherit match))))

   `(regex-tool-matched-face ((t (:foreground nil :background nil :inherit match))))

   ;; Cscope
   `(cscope-file-face ((t (:foreground ,base0B))))
   `(cscope-function-face ((t (:foreground ,base0D))))
   `(cscope-line-number-face ((t (:foreground ,base0A))))
   `(cscope-mouse-face ((t (:background ,base01 :foreground ,base04))))
   `(cscope-separator-face ((t (:foreground ,base08 :overline t :underline t :weight bold))))

   ;; mark-multiple
   `(mm/master-face ((t (:inherit region :foreground nil :background nil))))
   `(mm/mirror-face ((t (:inherit region :foreground nil :background nil))))

   ;; org-mode
   `(org-agenda-structure ((t (:foreground ,base0E))))
   `(org-agenda-date ((t (:foreground ,base0D :underline nil))))
   `(org-agenda-done ((t (:foreground ,base0B))))
   `(org-agenda-dimmed-todo-face ((t (:foreground ,base04))))
   `(org-block ((t (:foreground ,base09))))
   `(org-code ((t (:foreground ,base0A))))
   `(org-column ((t (:background ,base01))))
   `(org-column-title ((t (:inherit org-column :weight bold :underline t))))
   `(org-date ((t (:foreground ,base0E :underline t))))
   `(org-document-info ((t (:foreground ,base0C))))
   `(org-document-info-keyword ((t (:foreground ,base0B))))
   `(org-document-title ((t (:weight bold :foreground ,base09 :height 1.44))))
   `(org-done ((t (:foreground ,base0B))))
   `(org-ellipsis ((t (:foreground ,base04))))
   `(org-footnote ((t (:foreground ,base0C))))
   `(org-formula ((t (:foreground ,base08))))
   `(org-hide ((t (:foreground ,base03))))
   `(org-link ((t (:foreground ,base0D))))
   `(org-scheduled ((t (:foreground ,base0B))))
   `(org-scheduled-previously ((t (:foreground ,base09))))
   `(org-scheduled-today ((t (:foreground ,base0B))))
   `(org-special-keyword ((t (:foreground ,base09))))
   `(org-table ((t (:foreground ,base0E))))
   `(org-todo ((t (:foreground ,base08))))
   `(org-upcoming-deadline ((t (:foreground ,base09))))
   `(org-warning ((t (:weight bold :foreground ,base08))))

   `(markdown-url-face ((t (:inherit link))))
   `(markdown-link-face ((t (:foreground ,base0D :underline t))))

   `(hl-sexp-face ((t (:background ,base03))))
   `(highlight-80+ ((t (:background ,base03))))

   ;; Python-specific overrides
   `(py-builtins-face ((t (:foreground ,base09 :weight normal))))

   ;; js2-mode
   `(js2-warning-face ((t (:underline ,base09))))
   `(js2-error-face ((t (:foreground nil :underline ,base08))))
   `(js2-external-variable-face ((t (:foreground ,base0E))))
   `(js2-function-param-face ((t (:foreground ,base0D))))
   `(js2-instance-member-face ((t (:foreground ,base0D))))
   `(js2-private-function-call-face ((t (:foreground ,base08))))

   ;; js3-mode
   `(js3-warning-face ((t (:underline ,base09))))
   `(js3-error-face ((t (:foreground nil :underline ,base08))))
   `(js3-external-variable-face ((t (:foreground ,base0E))))
   `(js3-function-param-face ((t (:foreground ,base0D))))
   `(js3-jsdoc-tag-face ((t (:foreground ,base09))))
   `(js3-jsdoc-type-face ((t (:foreground ,base0C))))
   `(js3-jsdoc-value-face ((t (:foreground ,base0A))))
   `(js3-jsdoc-html-tag-name-face ((t (:foreground ,base0D))))
   `(js3-jsdoc-html-tag-delimiter-face ((t (:foreground ,base0B))))
   `(js3-instance-member-face ((t (:foreground ,base0D))))
   `(js3-private-function-call-face ((t (:foreground ,base08))))

   ;; nxml
   `(nxml-name-face ((t (:foreground unspecified :inherit font-lock-constant-face))))
   `(nxml-attribute-local-name-face ((t (:foreground unspecified :inherit font-lock-variable-name-face))))
   `(nxml-ref-face ((t (:foreground unspecified :inherit font-lock-preprocessor-face))))
   `(nxml-delimiter-face ((t (:foreground unspecified :inherit font-lock-keyword-face))))
   `(nxml-delimited-data-face ((t (:foreground unspecified :inherit font-lock-string-face))))
   `(rng-error-face ((t (:underline ,base08))))

   ;; RHTML
   `(erb-delim-face ((t (:background ,base03))))
   `(erb-exec-face ((t (:background ,base03 :weight bold))))
   `(erb-exec-delim-face ((t (:background ,base03))))
   `(erb-out-face ((t (:background ,base03 :weight bold))))
   `(erb-out-delim-face ((t (:background ,base03))))
   `(erb-comment-face ((t (:background ,base03 :weight bold :slant italic))))
   `(erb-comment-delim-face ((t (:background ,base03))))

   ;; Message-mode
   `(message-header-other ((t (:foreground nil :background nil :weight normal))))
   `(message-header-subject ((t (:inherit message-header-other :weight bold :foreground ,base0A))))
   `(message-header-to ((t (:inherit message-header-other :weight bold :foreground ,base09))))
   `(message-header-cc ((t (:inherit message-header-to :foreground nil))))
   `(message-header-name ((t (:foreground ,base0D :background nil))))
   `(message-header-newsgroups ((t (:foreground ,base0C :background nil :slant normal))))
   `(message-separator ((t (:foreground ,base0E))))

   ;; Jabber
   `(jabber-chat-prompt-local ((t (:foreground ,base0A))))
   `(jabber-chat-prompt-foreign ((t (:foreground ,base09))))
   `(jabber-chat-prompt-system ((t (:foreground ,base0A :weight bold))))
   `(jabber-chat-text-local ((t (:foreground ,base0A))))
   `(jabber-chat-text-foreign ((t (:foreground ,base09))))
   `(jabber-chat-text-error ((t (:foreground ,base08))))

   `(jabber-roster-user-online ((t (:foreground ,base0B))))
   `(jabber-roster-user-xa ((t :foreground ,base04)))
   `(jabber-roster-user-dnd ((t :foreground ,base0A)))
   `(jabber-roster-user-away ((t (:foreground ,base09))))
   `(jabber-roster-user-chatty ((t (:foreground ,base0E))))
   `(jabber-roster-user-error ((t (:foreground ,base08))))
   `(jabber-roster-user-offline ((t (:foreground ,base04))))

   `(jabber-rare-time-face ((t (:foreground ,base04))))
   `(jabber-activity-face ((t (:foreground ,base0E))))
   `(jabber-activity-personal-face ((t (:foreground ,base0C))))

   ;; Gnus
   `(gnus-cite-1 ((t (:inherit outline-1 :foreground nil))))
   `(gnus-cite-2 ((t (:inherit outline-2 :foreground nil))))
   `(gnus-cite-3 ((t (:inherit outline-3 :foreground nil))))
   `(gnus-cite-4 ((t (:inherit outline-4 :foreground nil))))
   `(gnus-cite-5 ((t (:inherit outline-5 :foreground nil))))
   `(gnus-cite-6 ((t (:inherit outline-6 :foreground nil))))
   `(gnus-cite-7 ((t (:inherit outline-7 :foreground nil))))
   `(gnus-cite-8 ((t (:inherit outline-8 :foreground nil))))
   ;; there are several more -cite- faces...
   `(gnus-header-content ((t (:inherit message-header-other))))
   `(gnus-header-subject ((t (:inherit message-header-subject))))
   `(gnus-header-from ((t (:inherit message-header-other-face :weight bold :foreground ,base09))))
   `(gnus-header-name ((t (:inherit message-header-name))))
   `(gnus-button ((t (:inherit link :foreground nil))))
   `(gnus-signature ((t (:inherit font-lock-comment-face))))

   `(gnus-summary-normal-unread ((t (:foreground ,base0D :weight normal))))
   `(gnus-summary-normal-read ((t (:foreground ,base06 :weight normal))))
   `(gnus-summary-normal-ancient ((t (:foreground ,base0C :weight normal))))
   `(gnus-summary-normal-ticked ((t (:foreground ,base09 :weight normal))))
   `(gnus-summary-low-unread ((t (:foreground ,base04 :weight normal))))
   `(gnus-summary-low-read ((t (:foreground ,base04 :weight normal))))
   `(gnus-summary-low-ancient ((t (:foreground ,base04 :weight normal))))
   `(gnus-summary-high-unread ((t (:foreground ,base0A :weight normal))))
   `(gnus-summary-high-read ((t (:foreground ,base0B :weight normal))))
   `(gnus-summary-high-ancient ((t (:foreground ,base0B :weight normal))))
   `(gnus-summary-high-ticked ((t (:foreground ,base09 :weight normal))))
   `(gnus-summary-cancelled ((t (:foreground ,base08 :background nil :weight normal))))

   `(gnus-group-mail-low ((t (:foreground ,base04))))
   `(gnus-group-mail-low-empty ((t (:foreground ,base04))))
   `(gnus-group-mail-1 ((t (:foreground nil :weight normal :inherit outline-1))))
   `(gnus-group-mail-2 ((t (:foreground nil :weight normal :inherit outline-2))))
   `(gnus-group-mail-3 ((t (:foreground nil :weight normal :inherit outline-3))))
   `(gnus-group-mail-4 ((t (:foreground nil :weight normal :inherit outline-4))))
   `(gnus-group-mail-5 ((t (:foreground nil :weight normal :inherit outline-5))))
   `(gnus-group-mail-6 ((t (:foreground nil :weight normal :inherit outline-6))))
   `(gnus-group-mail-1-empty ((t (:inherit gnus-group-mail-1 :foreground ,base04))))
   `(gnus-group-mail-2-empty ((t (:inherit gnus-group-mail-2 :foreground ,base04))))
   `(gnus-group-mail-3-empty ((t (:inherit gnus-group-mail-3 :foreground ,base04))))
   `(gnus-group-mail-4-empty ((t (:inherit gnus-group-mail-4 :foreground ,base04))))
   `(gnus-group-mail-5-empty ((t (:inherit gnus-group-mail-5 :foreground ,base04))))
   `(gnus-group-mail-6-empty ((t (:inherit gnus-group-mail-6 :foreground ,base04))))
   `(gnus-group-news-1 ((t (:foreground nil :weight normal :inherit outline-5))))
   `(gnus-group-news-2 ((t (:foreground nil :weight normal :inherit outline-6))))
   `(gnus-group-news-3 ((t (:foreground nil :weight normal :inherit outline-7))))
   `(gnus-group-news-4 ((t (:foreground nil :weight normal :inherit outline-8))))
   `(gnus-group-news-5 ((t (:foreground nil :weight normal :inherit outline-1))))
   `(gnus-group-news-6 ((t (:foreground nil :weight normal :inherit outline-2))))
   `(gnus-group-news-1-empty ((t (:inherit gnus-group-news-1 :foreground ,base04))))
   `(gnus-group-news-2-empty ((t (:inherit gnus-group-news-2 :foreground ,base04))))
   `(gnus-group-news-3-empty ((t (:inherit gnus-group-news-3 :foreground ,base04))))
   `(gnus-group-news-4-empty ((t (:inherit gnus-group-news-4 :foreground ,base04))))
   `(gnus-group-news-5-empty ((t (:inherit gnus-group-news-5 :foreground ,base04))))
   `(gnus-group-news-6-empty ((t (:inherit gnus-group-news-6 :foreground ,base04))))

   `(erc-direct-msg-face ((t (:foreground ,base09))))
   `(erc-error-face ((t (:foreground ,base08))))
   `(erc-header-face ((t (:foreground ,base06 :background ,base04))))
   `(erc-input-face ((t (:foreground ,base0B))))
   `(erc-keyword-face ((t (:foreground ,base0A))))
   `(erc-current-nick-face ((t (:foreground ,base0B))))
   `(erc-my-nick-face ((t (:foreground ,base0B))))
   `(erc-nick-default-face ((t (:weight normal :foreground ,base0E))))
   `(erc-nick-msg-face ((t (:weight normal :foreground ,base0A))))
   `(erc-notice-face ((t (:foreground ,base04))))
   `(erc-pal-face ((t (:foreground ,base09))))
   `(erc-prompt-face ((t (:foreground ,base0D))))
   `(erc-timestamp-face ((t (:foreground ,base0C))))

   ;; helm
   `(helm-M-x-key ((t (:foreground ,base0C))))
   `(helm-action ((t (:foreground ,base05))))
   `(helm-buffer-directory ((t (:foreground ,base04 :background nil :weight bold))))
   `(helm-buffer-file ((t (:foreground ,base0C))))
   `(helm-buffer-not-saved ((t (:foreground ,base08))))
   `(helm-buffer-process ((t (:foreground ,base03))))
   `(helm-buffer-saved-out ((t (:foreground ,base0F))))
   `(helm-buffer-size ((t (:foreground ,base09))))
   `(helm-candidate-number ((t (:foreground ,base00 :background ,base09))))
   `(helm-ff-directory ((t (:foreground ,base04 :background nil :weight bold))))
   `(helm-ff-executable ((t (:foreground ,base0B))))
   `(helm-ff-file ((t (:foreground ,base0C))))
   `(helm-ff-invalid-symlink ((t (:foreground ,base00 :background ,base08))))
   `(helm-ff-prefix ((t (:foreground nil :background nil))))
   `(helm-ff-symlink ((t (:foreground ,base00 :background ,base0C))))
   `(helm-grep-cmd-line ((t (:foreground ,base0B))))
   `(helm-grep-file ((t (:foreground ,base0C))))
   `(helm-grep-finish ((t (:foreground ,base00 :background ,base09))))
   `(helm-grep-lineno ((t (:foreground ,base03))))
   `(helm-grep-match ((t (:foreground ,base0A))))
   `(helm-grep-running ((t (:foreground ,base09))))
   `(helm-header ((t (:foreground ,base0A :background ,base00 :underline nil))))
   `(helm-match ((t (:foreground ,base0A))))
   `(helm-moccur-buffer ((t (:foreground ,base0C))))
   `(helm-selection ((t (:foreground nil :background ,base02 :underline nil))))
   `(helm-selection-line ((t (:foreground nil :background ,base02))))
   `(helm-separator ((t (:foreground ,base02))))
   `(helm-source-header ((t (:foreground ,base05 :background ,base01 :weight bold))))
   `(helm-visible-mark ((t (:foreground ,base00 :background ,base0B))))

   `(custom-variable-tag ((t (:foreground ,base0D))))
   `(custom-group-tag ((t (:foreground ,base0D))))
   `(custom-state ((t (:foreground ,base0B)))))

  (custom-theme-set-variables
   'base16-ashes-dark

   `(ansi-color-names-vector
     ;; black, base08, base0B, base0A, base0D, magenta, cyan, white
     [,base00 ,base08 ,base0B ,base0A ,base0D ,base0E ,base0D ,base05])
   `(ansi-term-color-vector
     ;; black, base08, base0B, base0A, base0D, magenta, cyan, white
     [unspecified ,base00 ,base08 ,base0B ,base0A ,base0D ,base0E ,base0D ,base05])))

(provide-theme 'base16-ashes-dark)

;;; base16-ashes-dark-theme.el ends here

^ permalink raw reply	[flat|nested] 10+ messages in thread

* bug#23366: 25.0.93; Custom font still not saved
  2016-04-27  7:33           ` PEDRO ANDRES ARANDA GUTIERREZ
@ 2016-04-27 16:39             ` Glenn Morris
  2016-04-28  5:58               ` PEDRO ANDRES ARANDA GUTIERREZ
  0 siblings, 1 reply; 10+ messages in thread
From: Glenn Morris @ 2016-04-27 16:39 UTC (permalink / raw)
  To: PEDRO ANDRES ARANDA GUTIERREZ; +Cc: 23366@debbugs.gnu.org

PEDRO ANDRES ARANDA GUTIERREZ wrote:

> I found the culprit… I'm using the attached base16-* theme. When I put
> it as my ~/.emacs.d/init.el file, I can't customise the font neither
> from the 'Options->Set Default Font' menu item for from M-x
> customize-faces -> default.

I think this is unrelated to the underlying with-ns issue that others
have previously reported and which AFAICS persists.





^ permalink raw reply	[flat|nested] 10+ messages in thread

* bug#23366: 25.0.93; Custom font still not saved
  2016-04-27 16:39             ` Glenn Morris
@ 2016-04-28  5:58               ` PEDRO ANDRES ARANDA GUTIERREZ
  0 siblings, 0 replies; 10+ messages in thread
From: PEDRO ANDRES ARANDA GUTIERREZ @ 2016-04-28  5:58 UTC (permalink / raw)
  To: Glenn Morris; +Cc: 23366@debbugs.gnu.org

Don’t know… Just saying that in my case it is the theme that causes problems with saving a customised font and that the problem is platform independent. Once I remove the theme, I can change the font and save it from customize-face and from Set Default font -> Save options… in *all* the environments I use.

Best, /PA
---
Dr. Pedro A. Aranda Gutiérrez

Technology Exploration -
Network Innovation & Virtualisation
email: pedroa d0t aranda At telefonica d0t com
Telefónica, Investigación y Desarrollo
C/ Zurbarán,12
28010 Madrid, Spain

Fragen sind nicht da, um beantwortet zu werden.
Fragen sind da, um gestellt zu werden.
Georg Kreisler









-----Mensaje original-----
De: Glenn Morris <rgm@gnu.org>
Fecha: miércoles, 27 de abril de 2016, 18:39
Para: paag <pedroa.aranda@telefonica.com>
CC: Eli Zaretskii <eliz@gnu.org>, "23366@debbugs.gnu.org" <23366@debbugs.gnu.org>
Asunto: Re: bug#23366: 25.0.93; Custom font still not saved

>PEDRO ANDRES ARANDA GUTIERREZ wrote:
>
>> I found the culprit… I'm using the attached base16-* theme. When I put
>> it as my ~/.emacs.d/init.el file, I can't customise the font neither
>> from the 'Options->Set Default Font' menu item for from M-x
>> customize-faces -> default.
>
>I think this is unrelated to the underlying with-ns issue that others
>have previously reported and which AFAICS persists.

________________________________

Este mensaje y sus adjuntos se dirigen exclusivamente a su destinatario, puede contener información privilegiada o confidencial y es para uso exclusivo de la persona o entidad de destino. Si no es usted. el destinatario indicado, queda notificado de que la lectura, utilización, divulgación y/o copia sin autorización puede estar prohibida en virtud de la legislación vigente. Si ha recibido este mensaje por error, le rogamos que nos lo comunique inmediatamente por esta misma vía y proceda a su destrucción.

The information contained in this transmission is privileged and confidential information intended only for the use of the individual or entity named above. If the reader of this message is not the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this transmission in error, do not read it. Please immediately reply to the sender that you have received this communication in error and then delete it.

Esta mensagem e seus anexos se dirigem exclusivamente ao seu destinatário, pode conter informação privilegiada ou confidencial e é para uso exclusivo da pessoa ou entidade de destino. Se não é vossa senhoria o destinatário indicado, fica notificado de que a leitura, utilização, divulgação e/ou cópia sem autorização pode estar proibida em virtude da legislação vigente. Se recebeu esta mensagem por erro, rogamos-lhe que nos o comunique imediatamente por esta mesma via e proceda a sua destruição

^ permalink raw reply	[flat|nested] 10+ messages in thread

* bug#23366: 25.0.93; Custom font still not saved
  2016-04-26 19:19         ` Glenn Morris
  2016-04-27  7:33           ` PEDRO ANDRES ARANDA GUTIERREZ
@ 2016-04-28 17:39           ` Glenn Morris
  1 sibling, 0 replies; 10+ messages in thread
From: Glenn Morris @ 2016-04-28 17:39 UTC (permalink / raw)
  To: Eli Zaretskii; +Cc: 23366


I think the actual problem is that ns-popup-font-panel returns nil,
immediately. It should wait for a font to be selected, then return that.
ns-win.el redefines x-select-font to ns-popup-font-panel.
x-select-font is documented to return the selected font.
(I have no idea how to fix it.)





^ permalink raw reply	[flat|nested] 10+ messages in thread

end of thread, other threads:[~2016-04-28 17:39 UTC | newest]

Thread overview: 10+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2016-04-25  6:00 bug#23366: 25.0.93; Custom font still not saved PEDRO ANDRES ARANDA GUTIERREZ
2016-04-25  7:38 ` Eli Zaretskii
2016-04-25  7:45   ` PEDRO ANDRES ARANDA GUTIERREZ
2016-04-25  7:56     ` Eli Zaretskii
2016-04-25  8:53       ` Eli Zaretskii
2016-04-26 19:19         ` Glenn Morris
2016-04-27  7:33           ` PEDRO ANDRES ARANDA GUTIERREZ
2016-04-27 16:39             ` Glenn Morris
2016-04-28  5:58               ` PEDRO ANDRES ARANDA GUTIERREZ
2016-04-28 17:39           ` Glenn Morris

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).