diff --git a/settings/gui-settings.el b/settings/gui-settings.el index 6f2a80ae..89108880 100644 --- a/settings/gui-settings.el +++ b/settings/gui-settings.el @@ -16,32 +16,41 @@ ;;; Code: +;; defining characters, e.g. vertical bar │: +;; - 9474 as decimal +;; - #o22402 as octal +;; - #x2502 as unicode +;; using characters inside string: +;; - "\u2502" + (use-package emacs :delight - (auto-fill-function "Fa") ;; "\u21B5" - (compilation-shell-minor-mode "Csh") ;; "\u24B8\uFF53" - (eldoc-mode "Ed") ;; \u24BA e - (visual-line-mode "Vl") ;; " Wrap" "\u21A9" - (whitespace-mode "Ws") ;; "\u2423 \u005F ws" + (auto-fill-function "Fa") ;; "\u21B5" + (compilation-shell-minor-mode "Csh") ;; "\u24B8\uFF53" + (eldoc-mode "Ed") ;; "\u24BA" e + (visual-line-mode "Vl") ;; " Wrap" "\u21A9" + (whitespace-mode "Ws") ;; "\u2423 \u005F ws" ;; major modes - (calendar-mode "Ca") ;; "Calendar" "\u01F4C6" "\u01F152\uFF41\uFF4C" - (css-mode "Css") ;; "CSS"" "\u01F152ss - (emacs-lisp-mode "El") ;; "EL" "\u01F15B\uFF45" - (eshell-mode "Esh") ;; "Esh" "\u01F162\uFF45 - (fundamental-mode "Fu") ;; "F " "\u01F155" ;; not working - (help-mode "H") ;; "H " "\u01F157" - (Info-mode "I") ;; "I " "\u01F158" ;; not working - (latex-mode "La") ;; "LaTeX " "\u01F15B\uFF41" - (lisp-interaction-mode "Lii") ;; "LI \u01F15B\u24A4" "\u01F15B\uFF49 - (messages-mode "M") ;; "M " "\u01F15C" ;; not working - (messages-buffer-mode "M") ;; "M " "\u01F15C" ;; not working - (inferior-python-mode "Pyi") ;; "IPy \u01F15F\u24A4" "\u01F15F\uFF49" + (calendar-mode "Ca") ;; "Calendar" "\u01F4C6" "\u01F152\uFF41\uFF4C" + (css-mode "Css") ;; "CSS"" "\u01F152ss + (emacs-lisp-mode "El") ;; "EL" "\u01F15B\uFF45" + (eshell-mode "Esh") ;; "Esh" "\u01F162\uFF45 + (fundamental-mode "Fu") ;; "F " "\u01F155" ;; not working + (help-mode "H") ;; "H " "\u01F157" + (Info-mode "I") ;; "I " "\u01F158" ;; not working + (latex-mode "La") ;; "LaTeX " "\u01F15B\uFF41" + (lisp-interaction-mode "Lii") ;; "LI \u01F15B\u24A4" "\u01F15B\uFF49 + (messages-mode "M") ;; "M " "\u01F15C" ;; not working + (messages-buffer-mode "M") ;; "M " "\u01F15C" ;; not working + (inferior-python-mode "Pyi") ;; "IPy \u01F15F\u24A4" "\u01F15F\uFF49" :hook (prog-mode . display-fill-column-indicator-mode) (help-mode . visual-line-mode) (messages-buffer-mode . visual-line-mode) :config - (set-face-attribute 'fill-column-indicator nil :foreground "DarkSlateGray")) ;; inherit shadow + ;; display-fill-column-indicator + ;; (setq display-fill-column-indicator-character 9474) ;; 9474 is default + (set-face-attribute 'fill-column-indicator nil :foreground "DarkSlateGray")) ;; ┌────────────── Frame width ───────────────┐ @@ -80,6 +89,7 @@ (window-divider-mode 1)) (use-package scroll-bar + ;; built-in :defer t :config ;; `scroll-bar-mode' sets for all frames and all windows diff --git a/settings/theme-settings.el b/settings/theme-settings.el index 0e49a02e..6fa15294 100644 --- a/settings/theme-settings.el +++ b/settings/theme-settings.el @@ -36,19 +36,25 @@ ;; ✈↵#↹⏎⇤⇥␣↑↓←→ ☐☑ ;; :rage::hamburger: ;; see M-x describe-char + +;; (set-frame-font "DejaVu Sans Mono-10") +;; (set-frame-font "DejaVu Sans Mono:pixelsize=13") +;; (set-frame-font (font-spec :name "DejaVu Sans Mono" :size 13)) (cond ((find-font (font-spec :name "DejaVu Sans Mono")) - (set-frame-font "DejaVu Sans Mono-10")) + (set-frame-font (font-spec :name "DejaVu Sans Mono" :size 13))) + ((find-font (font-spec :name "Noto Sans Mono")) ;; parentheses moving + (set-frame-font (font-spec :name "Noto Sans Mono" :size 13))) ((find-font (font-spec :name "Source Han Mono")) (set-frame-font "Source Han Mono-9")) ((find-font (font-spec :name "inconsolata")) - (set-frame-font "inconsolata-10")) + (set-frame-font (font-spec :name "inconsolata" :size 16))) ((find-font (font-spec :name "Source Code Pro")) (set-frame-font "Source Code Pro-10")) ((find-font (font-spec :name "Lucida Console")) (set-frame-font "Lucida Console-10")) - ((find-font (font-spec :name "courier")) - (set-frame-font "courier-10"))) + ((find-font (font-spec :name "courier")) ;; is breathing if underline is displayed dynamically + (set-frame-font (font-spec :name "courier" :size 14)))) (use-package emojify :if window-system