d6
/
emacs.d
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

support cleanse settings

This commit is contained in:
~d6 2022-08-04 22:19:52 -04:00
parent fc4c5927cc
commit 83e481418c
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
init.el
View File

@ -70,6 +70,9 @@
(set-language-environment "UTF-8") (set-language-environment "UTF-8")
(set-default-coding-systems 'utf-8) (set-default-coding-systems 'utf-8)
(defvar use-pragmata)
(setq use-pragmata (not (equal (system-name) "cleanse")))
;; UI settings when not in a terminal ;; UI settings when not in a terminal
(when (display-graphic-p) (when (display-graphic-p)
(setq mac-option-key-is-meta nil (setq mac-option-key-is-meta nil
@ -77,13 +80,15 @@
mac-command-modifier 'meta mac-command-modifier 'meta
mac-option-modifier nil mac-option-modifier nil
x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING)) x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING))
(if use-pragmata
(set-frame-font "PragmataPro Liga 24" nil t) (set-frame-font "PragmataPro Liga 24" nil t)
(set-frame-font "Iosevka 24" nil t))
(set-foreground-color "#c7c7c7") (set-foreground-color "#c7c7c7")
(set-background-color "#000000")) (set-background-color "#000000"))
;; set up font ligatures ;; set up font ligatures
(use-package pragmatapro-lig (use-package pragmatapro-lig
:if window-system :if (and window-system use-pragmata)
:straight (pragmatapro-lig :type git :straight (pragmatapro-lig :type git
:host github :host github
:repo "lumiknit/emacs-pragmatapro-ligatures") :repo "lumiknit/emacs-pragmatapro-ligatures")