77 lines
5.2 KiB
EmacsLisp
77 lines
5.2 KiB
EmacsLisp
;;; theme-settings.el --- Theme settings -*- mode: emacs-lisp; lexical-binding: t -*-
|
||
|
||
;;; Commentary:
|
||
|
||
;; Requirements:
|
||
;; spacemacs-theme https://github.com/nashamri/spacemacs-theme
|
||
;; emojify https://melpa.org/#/emojify
|
||
;; Fonts:
|
||
;; Source Han Mono (debian fonts-noto-cjk-extra)
|
||
;; Asana Math (debian texlive-fonts-extra)
|
||
|
||
;;; Code:
|
||
(use-package my-theme
|
||
:config
|
||
(setq spacemacs-theme-comment-bg nil)
|
||
(load-theme 'spacemacs-dark t)
|
||
(load-theme 'my t))
|
||
|
||
;; Test char and monospace:
|
||
;; 1234567890abcdefghijklmnopqrstuvwxyz [] () :;,. !@#$^&*
|
||
;; 1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ {} <> "'` ~-_/|\?
|
||
;; ａｂｃｄｅｆｇｈｉｊｋｌｍｎｏｐｑｒｓｔｕｖｗｘｙｚ FULLWIDTH LATIN SMALL LETTER X
|
||
;; ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺ FULLWIDTH LATIN CAPITAL LETTER X
|
||
;; ⑴⑵⑶⑷⑸⑹⑺⑻⑼⑽⑾⑿⒀⒁⒂⒃⒄⒅⒆⒇ PARENTHESIZED DIGIT X, PARENTHESIZED NUMBER X
|
||
;; ⒜⒝⒞⒟⒠⒡⒢⒣⒤⒥⒦⒧⒨⒩⒪⒫⒬⒭⒮⒯⒰⒱⒲⒳⒴⒵ PARENTHESIZED LATIN SMALL LETTER X
|
||
;; 🄐🄑🄒🄓🄔🄕🄖🄗🄘🄙🄚🄛🄜🄝🄞🄟🄠🄡🄢🄣🄤🄥🄦🄧🄨🄩 PARENTHESIZED LATIN CAPITAL LETTER X
|
||
;; ①②③④⑤⑥⑦⑧⑨⓪ ⓵⓶⓷⓸⓹⓺⓻⓼⓽ CIRCLED DIGIT X, DOUBLE CIRCLED DIGIT ONE
|
||
;; ❶❷❸❹❺❻❼❽❾ ➊➋➌➍➎➏➐➑➒🄌 DINGBAT NEGATIVE CIRCLED DIGIT X, DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT X
|
||
;; ⓐⓑⓒⓓⓔⓕⓖⓗⓘⓙⓚⓛⓜⓝⓞⓟⓠⓡⓢⓣⓤⓥⓦⓧⓨⓩ CIRCLED LATIN SMALL LETTER X
|
||
;; ⒶⒷⒸⒹⒺⒻⒼⒽⒾⒿⓀⓁⓂⓃⓄⓅⓆⓇⓈⓉⓊⓋⓌⓍⓎⓏ CIRCLED LATIN CAPITAL LETTER X
|
||
;; 🅐🅑🅒🅓🅔🅕🅖🅗🅘🅙🅚🅛🅜🅝🅞🅟🅠🅡🅢🅣🅤🅥🅦🅧🅨🅩 NEGATIVE CIRCLED LATIN CAPITAL LETTER X
|
||
;; 🄰🄱🄲🄳🄴🄵🄶🄷🄸🄹🄺🄻🄼🄽🄾🄿🅀🅁🅂🅃🅄🅅🅆🅇🅈🅉 SQUARED LATIN CAPITAL LETTER X
|
||
;; 🅰🅱🅲🅳🅴🅵🅶🅷🅸🅹🅺🅻🅼🅽🅾🅿🆀🆁🆂🆃🆄🆅🆆🆇🆈🆉 🆊 NEGATIVE SQUARED LATIN CAPITAL LETTER X
|
||
;; 𝓪𝓫𝓬𝓭𝓮𝓯𝓰𝓱𝓲𝓳𝓴𝓵𝓶𝓷𝓸𝓹𝓺𝓻𝓼𝓽𝓾𝓿𝔀𝔁𝔂𝔃 MATHEMATICAL BOLD SCRIPT SMALL X
|
||
;; 𝓐𝓑𝓒𝓓𝓔𝓕𝓖𝓗𝓘𝓙𝓚𝓛𝓜𝓝𝓞𝓟𝓠𝓡𝓢𝓣𝓤𝓥𝓦𝓧𝓨𝓩 MATHEMATICAL BOLD SCRIPT CAPITAL X
|
||
;; ✈↵＃↹⏎⇤⇥␣↑↓←→ ☐☑
|
||
;; :rage::hamburger:
|
||
;; box drawing alignment tests: █
|
||
;; ▉
|
||
;; ╔══╦══╗ ┌──┬──┐ ╭──┬──╮ ╭──┬──╮ ┏━━┳━━┓ ┎┒┏┑ ╷ ╻ ┏┯┓ ┌┰┐ ▊ ╱╲╱╲╳╳╳
|
||
;; ║┌─╨─┐║ │╔═╧═╗│ │╒═╪═╕│ │╓─╁─╖│ ┃┌─╂─┐┃ ┗╃╄┙ ╶┼╴╺╋╸┠┼┨ ┝╋┥ ▋ ╲╱╲╱╳╳╳
|
||
;; ║│╲ ╱│║ │║ ║│ ││ │ ││ │║ ┃ ║│ ┃│ ╿ │┃ ┍╅╆┓ ╵ ╹ ┗┷┛ └┸┘ ▌ ╱╲╱╲╳╳╳
|
||
;; ╠╡ ╳ ╞╣ ├╢ ╟┤ ├┼─┼─┼┤ ├╫─╂─╫┤ ┣┿╾┼╼┿┫ ┕┛┖┚ ┌┄┄┐ ╎ ┏┅┅┓ ┋ ▍ ╲╱╲╱╳╳╳
|
||
;; ║│╱ ╲│║ │║ ║│ ││ │ ││ │║ ┃ ║│ ┃│ ╽ │┃ ░░▒▒▓▓██ ┊ ┆ ╎ ╏ ┇ ┋ ▎
|
||
;; ║└─╥─┘║ │╚═╤═╝│ │╘═╪═╛│ │╙─╀─╜│ ┃└─╂─┘┃ ░░▒▒▓▓██ ┊ ┆ ╎ ╏ ┇ ┋ ▏
|
||
;; ╚══╩══╝ └──┴──┘ ╰──┴──╯ ╰──┴──╯ ┗━━┻━━┛ └╌╌┘ ╎ ┗╍╍┛ ┋ ▁▂▃▄▅▆▇█
|
||
;; 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 "Source Code Pro"))
|
||
(set-frame-font (font-spec :name "Source Code Pro" :size 13)))
|
||
((find-font (font-spec :name "DejaVu Sans Mono"))
|
||
(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 (font-spec :name "Source Han Mono" :size 12)))
|
||
((find-font (font-spec :name "inconsolata"))
|
||
(set-frame-font (font-spec :name "inconsolata" :size 16)))
|
||
((find-font (font-spec :name "Lucida Console"))
|
||
(set-frame-font "Lucida Console-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
|
||
:commands emojify-mode
|
||
;; :hook (after-init . global-emojify-mode)
|
||
:init
|
||
(setq emojify-emojis-dir (concat user-emacs-directory ".cache/emojify")))
|
||
|
||
(provide 'theme-settings)
|
||
;;; theme-settings.el ends here
|