           (let
             ((buf-name (buffer-name buf)))
             (when
-              (andT
+              (and
                 ;; if a buffer's name is enclosed by * with optional leading space characters
                 ;; (string-match-p "\\` *\\*.*\\*\\'" buf-name)
                 ;; The buffer must not be associated with a process

  :config
  (global-hl-line-mode           t))          ; Enable global hl-line mode

(use-package modus-themes
  :init
  ;; Add all your customizations prior to loading the themes

  ;; Make headings larger in height relative to the main text.
  (setq modus-themes-scale-headings t)

  ;; Use a more prominent background color hl-line-mode
  (setq modus-themes-intense-hl-line t)

  :config
  (let
    ((line (face-attribute 'mode-line :underline)))
    (set-face-attribute 'mode-line          nil :overline   line)
    (set-face-attribute 'mode-line-inactive nil :overline   line)
    (set-face-attribute 'mode-line-inactive nil :underline  line)
    (set-face-attribute 'mode-line          nil :box        nil)
    (set-face-attribute 'mode-line-inactive nil :box        nil)
    (set-face-attribute 'mode-line-inactive nil :background "#f6f6f6"))) ;; "#d33682")))

(use-package mouse
  :ensure nil
  :custom

  (set-fontset-font                   t nil "Monaco 12")
  (set-fontset-font                   t 'symbol (font-spec :family "Apple Color Emoji"))
  ;; (add-to-list                        'default-frame-alist '(fullscreen . maximized))
  (add-to-list                        'default-frame-alist '(font . "Monaco 12"))
  (set-face-attribute 'default        nil :family "Monaco"    :height 120)
  (set-face-attribute 'fixed-pitch    nil :family "Monaco"    :height 120)
  (set-face-attribute 'variable-pitch nil :family "charter"   :height 170)

  ;; Specific settings for emacs TUI and C-= handling
  (unless (display-graphic-p)
    ;; See https://stackoverflow.com/questions/10660060/how-do-i-bind-c-in-emacs
    (defun my/map-key (key)
      "Map KEY from escape sequence \"\e[emacs-KEY\."
      ;; It assumes that the underlying terminal has been configured to send the escape sequence \e[emacs-= when pressing C-=
