タイトルバーをモダンな感じにする

モダンな見た目になって大変よいです。

(when (eq window-system 'ns)
  (add-to-list 'default-frame-alist '(ns-transparent-titlebar . t))
  (add-to-list 'default-frame-alist '(ns-appearance . dark)))

すぐに適用したい場合は *scratch* なり M-: なりで

(set-frame-parameter nil 'ns-transparent-titlebar t)
(set-frame-parameter nil 'ns-appearance 'dark)

とするとよいと思います。