set-default-font is overridden by foundation-pack about emacs-live HOT 2 CLOSED

That is because of the following code in foundation-pack/config/cosmetic.el:

(cond
 ((and (window-system) (eq system-type 'darwin))
  (add-to-list 'default-frame-alist '(font . "Menlo-12"))))

I was not able to figure out why, but it seems like because of this code, using set-face-attribute to change the font was only working after startup. Because of this—and inspired by cassiel, I was using some wrapper functions to change color themes and change the font at the same time (and do some other customization). For example:

(defun cyberpunk ()
 (interactive)
 (color-theme-cyberpunk)
 (set-face-background 'hl-line "grey13")
 (set-face-attribute 'default nil :font "Courier 14"))

I recently found the code setting the font in foundation-pack/config/cosmetic.el and figured out that you can override it with some code in your own live-pack or .emacs-live.el with some code like this:

(remove-if (lambda (x)
             (eq 'font (car x)))
           default-frame-alist)
(cond
 ((and (window-system) (eq system-type 'darwin))
  (add-to-list 'default-frame-alist '(font . "Courier 14"))))

from emacs-live.

@rothmichaels, thanks! It works just fine.

from emacs-live.