;;; 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-common
  :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
