RE: Modernize frame-title-format: "%b - GNU Emacs"

[Drew Adams]

Just as something to try out, here's a slightly simplified
`mode-line-format' value.  I'm not proposing anything; just
tossing this out as food for thought.

(defcustom frame-title-app-name-show-Emacs nil
  "Non-nil means put `Emacs' at the beginning of the frame title."
  :type 'boolean :group 'frames)

(setq frame-title-format
      '(multiple-frames 
        ("%e"
           (frame-title-app-name-show-Emacs "Emacs" "")
         mode-line-front-space 
         mode-line-client
         mode-line-modified
         mode-line-remote
         mode-line-frame-identification
         mode-line-buffer-identification
         " "
         mode-line-modes
         (which-function-mode ("" which-func-format "  "))
         global-mode-string)
        "%b"))