From 4ca87469a6e5238a5193c9eaa0ab370b5d7e1a51 Mon Sep 17 00:00:00 2001 From: Daniel Weschke Date: Tue, 22 Feb 2022 16:39:48 +0100 Subject: [PATCH] remove some unicode for terminal compatibility fully deactivating might be (set-terminal-coding-system 'iso-latin-1) --- settings/completion-settings.el | 6 ++-- settings/gui-settings.el | 48 ++++++++++++++-------------- settings/ledger-settings.el | 4 +-- settings/mail-settings.el | 18 +++++------ settings/org-settings.el | 8 ++--- settings/python-settings.el | 6 ++-- settings/syntax-checking-settings.el | 2 +- settings/theme-settings.el | 1 + settings/which-key-settings.el | 2 +- 9 files changed, 48 insertions(+), 47 deletions(-) diff --git a/settings/completion-settings.el b/settings/completion-settings.el index b0430b1a..4019ae4c 100644 --- a/settings/completion-settings.el +++ b/settings/completion-settings.el @@ -34,7 +34,7 @@ ;; valid actions. (use-package ivy :load-path (lambda() (concat config-dir "lisp/ivy")) - :delight (ivy-mode "Ⓘ") ;; Ⓘ i + :delight (ivy-mode "Ivy") ;; \u24BE i :defer 0.1 ;; Ivy-based interface to standard commands :bind (("C-s" . swiper) @@ -115,7 +115,7 @@ (use-package company :load-path (lambda() (concat config-dir "lisp/company")) - :delight (company-mode "Ⓒ") ;; Ⓒ c + :delight (company-mode "Co") ;; \u24B8 c ;;:bind (("C-M-i" . company-complete)) :bind (([remap completion-at-point] . company-complete) :map lisp-interaction-mode-map @@ -180,7 +180,7 @@ Possible PACKAGE values are `company'." (use-package yasnippet ;; https://elpa.gnu.org/packages/yasnippet.html :defer 1 - :delight (yas-minor-mode "Ⓨ") ;; Ⓨ y + :delight (yas-minor-mode "Ys") ;; \u24CE y ;; see also variable yas-snippet-dirs, the yasnippet-snippets ;; collection dir is added via require 'yasnippet-snipets :config diff --git a/settings/gui-settings.el b/settings/gui-settings.el index 6144dedc..794300aa 100644 --- a/settings/gui-settings.el +++ b/settings/gui-settings.el @@ -18,24 +18,24 @@ (use-package emacs :delight - (auto-fill-function "↵") - (compilation-shell-minor-mode "Ⓒｓ") - (eldoc-mode "Ⓔ") ;; Ⓔ e - (visual-line-mode "↩") ;; " Wrap" - (whitespace-mode "␣") ;; "␣ _ 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 "🅒ａｌ") ;; "Calendar" "📆" - (css-mode "🅒SS") ;; "CSS" - (emacs-lisp-mode "🅛ｅ") ;; "EL 🅛⒠" - (eshell-mode "🅢ｅ") ;; "Esh 🅔⒮" - (fundamental-mode "🅕") ;; "F " ;; not working - (help-mode "🅗") ;; "H " - (Info-mode "🅘") ;; "I " ;; not working - (latex-mode "🅛ａ") ;; "LaTeX " - (lisp-interaction-mode "🅛ｉ") ;; "LI 🅛⒤" - (messages-mode "🅜") ;; "M " ;; not working - (messages-buffer-mode "🅜") ;; "M " ;; not working - (inferior-python-mode "🅟ｉ") ;; "IPy 🅟⒤" + (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) @@ -163,14 +163,14 @@ DISPLAY-START: `integer', e.g. 3820" (use-package doc-view :defer t - :delight (doc-view-mode "🅓ｏｃ") ;; "DocView" + :delight (doc-view-mode "Doc") ;; "DocView" "\u01F153\uFF4F\uFF43" :config (setq doc-view-continuous t)) (use-package restart-emacs) (use-package page-break-lines - :delight (page-break-lines-mode "Ⓟｂ") + :delight (page-break-lines-mode "Pb") ;; "\u24C5\uFF42" :config (add-to-list 'page-break-lines-modes 'ledger-mode) (global-page-break-lines-mode)) @@ -190,7 +190,7 @@ DISPLAY-START: `integer', e.g. 3820" (use-package dashboard :load-path (lambda() (concat config-dir "lisp/dashboard")) - :delight (dashboard-mode "🅓") + :delight (dashboard-mode "Db") ;; "\u01F153 :config ;; because we use `use-package' include `use-package-statistics' if computed (defun my-dashboard-init-info () @@ -386,7 +386,7 @@ See also `dashboard-insert-section' for the sequence of elements." (dashboard-setup-startup-hook)) (use-package indent-guide - :delight (indent-guide-mode "Ⓘｇ") + :delight (indent-guide-mode "Ig") ;; "\u24BE\uFF47" :hook (prog-mode . indent-guide-mode) ;; problem if used in notmuch :config (set-face-attribute 'indent-guide-face nil :foreground "DarkSlateGray") ;; foreground #535353 @@ -397,7 +397,7 @@ See also `dashboard-insert-section' for the sequence of elements." ;; problem when using 'character in elisp it inserts the guide characters when inserting text before guide characters ;; (use-package highlight-indent-guides -;; :delight (highlight-indent-guides-mode "Ⓘｇ") +;; :delight (highlight-indent-guides-mode "\u24BE\uFF47") ;; :hook (prog-mode . highlight-indent-guides-mode) ;; :config ;; (setq highlight-indent-guides-method 'character) ;; 'fill 'character 'bitmap @@ -407,7 +407,7 @@ See also `dashboard-insert-section' for the sequence of elements." ;; ) (use-package rainbow-mode - :delight (rainbow-mode "Ⓡ") ;; " Rbow" + :delight (rainbow-mode "Rb") ;; " Rbow" "\u24C7" :commands rainbow-mode) (use-package focus @@ -420,7 +420,7 @@ See also `dashboard-insert-section' for the sequence of elements." ) (use-package virtual-auto-fill - :delight (virtual-auto-fill-mode "Ⓥｆ") + :delight (virtual-auto-fill-mode "Fv") ;; "\u24CB\uFF46" :commands virtual-auto-fill-mode ;;:hook (help-mode . virtual-auto-fill-mode) ) diff --git a/settings/ledger-settings.el b/settings/ledger-settings.el index 743628a8..093a94ae 100644 --- a/settings/ledger-settings.el +++ b/settings/ledger-settings.el @@ -16,8 +16,8 @@ (use-package ledger-mode :load-path (lambda() (concat config-dir "lisp/ledger-mode")) :delight - (ledger-mode "🅛ｄ") ; "Le " - (ledger-report-mode "🅛dr") ; "LeR 🅖⒭" + (ledger-mode "Le") ; "Le " "\u01F15B\uFF44" + (ledger-report-mode "Ler") ; "LeR \u01F156\u24AD" "\01F15B :commands ledger-mode :mode "\\.ledger\\'" :config diff --git a/settings/mail-settings.el b/settings/mail-settings.el index 2b39ef88..8ef4e966 100644 --- a/settings/mail-settings.el +++ b/settings/mail-settings.el @@ -113,10 +113,10 @@ be set according to this variable." ;; [\] `mu4e-headers-query-prev' - go back to previous search query (use-package mu4e :delight - (mu4e-main-mode "🅜ｍ") - (mu4e-headers-mode "🅜ｈ") ;; will be overwitten with `mu4e~headers-search-execute' - (mu4e-view-mode "🅜ｖ") - (mu4e~update-mail-mode "🅜ｕ") + (mu4e-main-mode "Mum") ;; "\u01F15C\uFF4D" + (mu4e-headers-mode "Muh") ;; "\u01515C\uFF48" will be overwitten with `mu4e~headers-search-execute' + (mu4e-view-mode "Muv") ;; "\u01F15C\uFF56" + (mu4e~update-mail-mode "Muu") ;; "\u01F15C\uFF55" :commands mu4e :config ;; allow to display emoji in the subject lines of the emails @@ -287,11 +287,11 @@ MSG is a message p-list from mu4e." (use-package notmuch :delight - (notmuch-hello-mode "🅝ｈ") - (notmuch-message-mode "🅝ｍ") - (notmuch-search-mode "🅝ｓ") - (notmuch-show-mode "🅝ｗ") - (notmuch-tree-mode "🅝ｔ") + (notmuch-hello-mode "Nmh") ;; "\u01F15D\uFF48" + (notmuch-message-mode "Nmm") ;; "\u01F15D\uFF4D" + (notmuch-search-mode "Nms") ;; "\u01F15D\uFF53" + (notmuch-show-mode "Nmv") ;; "\u01F15D\uFF57" + (notmuch-tree-mode "Nmt") ;; "\u01F15D\uFF54" :commands notmuch :config (set-face-attribute 'notmuch-tag-flagged nil :foreground "#b1951d") diff --git a/settings/org-settings.el b/settings/org-settings.el index 983e3a7d..91db02cf 100644 --- a/settings/org-settings.el +++ b/settings/org-settings.el @@ -247,7 +247,7 @@ Example defines ;; conflict. (use-package org :load-path (lambda () (list (concat config-dir "lisp/org"))) - :delight (org-mode "🅞") ;; "Org " + :delight (org-mode "Org") ;; "Org " "\u01F15E" :defer t :init (setq org-export-backends '(ascii html icalendar latex md odt reveal tufte)) @@ -469,7 +469,7 @@ Suggest the URL title as a description for resource." (use-package org-fancy-priorities :after (org) - :delight (org-fancy-priorities-mode "Ⓟ") ;; FancyPriorities + :delight (org-fancy-priorities-mode "Fp") ;; FancyPriorities "\u24C5" :hook (org-mode . org-fancy-priorities-mode) :config ;; 🅐🅑🅒🅓 🅰🅱🅲🅳 ❗⬆⬇☕ ⚡⮬⮮☕ @@ -525,7 +525,7 @@ Suggest the URL title as a description for resource." (use-package org-num ;; numbering of headings :after (org) - :delight (org-num-mode "＃") ;; o# + :delight (org-num-mode "#") ;; o# "\uFF03" :config (setq org-num-skip-tags '("ignore")) (setq org-num-skip-unnumbered t)) @@ -566,7 +566,7 @@ Suggest the URL title as a description for resource." (use-package org-table-sticky-header :after (org) - :delight (org-table-sticky-header-mode "Ⓣ") ;; Ⓞt OTSH + :delight (org-table-sticky-header-mode "Tsh") ;; \u24C4t OTSH "\u24C9" :hook (org-mode . org-table-sticky-header-mode)) ;; must be set before org-sticky-header-mode, maybe orgtbl-show-header can also be used (use-package org-tempo ;; expand