Re: New Frame is different

[Peter Dyballa]

Am 23.11.2011 um 12:32 schrieb ken:

> But what's the variable name for cursor color?  And for font size?  I looked 
> for these in the "Help" and some googling, but no help.

(setq initial-frame-alist
  (append (list
    '(border-color      . "#4e3832")
    '(foreground-color  . "grey10")
;    '(background-color . "light steel blue")
    '(background-color . "azure")
;    '(active-alpha     . 0.875)
;    '(inactive-alpha   . 0.75)
;    '(font . "fontset-10pt_free_mono")
;    '(font . "fontset-09pt_lucida_sans_typewriter")
;    '(font . "fontset-09pt_vera_sans_mono")
;       '(font . "fontset-09pt_luxi mono")
    '(top . 136) '(left . 666) '(width . 100) '(height . 57)
  ) initial-frame-alist))
(setq default-frame-alist
  (append (list
;    '(background-color . "MintCream")
;    '(background-color . "azure")
    '(cursor-type       . box)
    '(active-alpha      . 0.875)
    '(inactive-alpha    . 0.75)
    '(vertical-scroll-bars . left)
;+      '(font . "Latin Modern Mono Light-8")
;    '(top . 25) '(left . 50) '(width . 89) '(height . 50)
    ) default-frame-alist))
(if (= 22 emacs-major-version)
    (setq default-frame-alist
      (append (list
        '(foreground-color      . "grey10")
        '(background-color      . "honeydew")
        '(cursor-color          . "DarkGreen")
        '(font . "fontset-10pt_lucida_sans_typewriter")
        '(top . 40) '(left . 518) '(width . 85) '(height . 45)
    ) default-frame-alist)))
(if (= 23 emacs-major-version)
    (setq default-frame-alist
      (append (list
        '(foreground-color      . "NavyBlue")
        '(background-color      . "LightCyan")
        '(cursor-color          . "firebrick")
        '(top . 66) '(left . 636) '(width . 100) '(height . 57)
        '(font . "fontset-11pt_lucida_sans_typewriter")
;+      '(font . "Lucida Sans Typewriter-8")
    ) default-frame-alist)))
(if (= 24 emacs-major-version)
    (progn
      (setq default-frame-alist
        (append (list
        '(foreground-color      . "purple4")
        '(background-color      . "MintCream")
        '(cursor-color          . "IndianRed")
        '(top . 66) '(left . 636) '(width . 100) '(height . 57)
;+      '(font . "fontset-09pt_lucida_sans_typewriter")
;       '(font . "fontset-10pt_vera_sans_mono")
      ) default-frame-alist))
      (setq initial-frame-alist
        (append (list '(font . "LucidaTypewriter-8") )
        initial-frame-alist))
    ))

Colour names and colours: M-x list-colors-display.

--
Greetings

  Pete

Well done is better than well said.
                                – Benjamin Franklin