63 lines
3.3 KiB
EmacsLisp
63 lines
3.3 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 spacemacs-theme
|
||
:after (cl-lib) ;; spacemacs-common misses to load cl-lib
|
||
:config
|
||
(load-theme 'spacemacs-dark 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:
|
||
;; see M-x describe-char
|
||
(cond
|
||
((find-font (font-spec :name "DejaVu Sans Mono"))
|
||
(set-frame-font "DejaVu Sans Mono-10"))
|
||
((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"))
|
||
((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")))
|
||
|
||
(setq inhibit-compacting-font-caches t)
|
||
|
||
(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
|