diff options
| author | Ravi R Kiran <aine.marina@gmail.com> | 2022-04-19 11:52:59 (GMT) |
|---|---|---|
| committer | Ravi R Kiran <aine.marina@gmail.com> | 2022-04-19 11:52:59 (GMT) |
| commit | 990e728d0d4725167c9d9110d815dd1efd2f73f2 (patch) | |
| tree | df9764be82620d81f6a733f2d17089a1a423db6d /init.el | |
| parent | 26067be3a4d90df83bcc9cd0364c185b6f2fa68b (diff) | |
| download | dotemacs-990e728d0d4725167c9d9110d815dd1efd2f73f2.zip dotemacs-990e728d0d4725167c9d9110d815dd1efd2f73f2.tar.gz dotemacs-990e728d0d4725167c9d9110d815dd1efd2f73f2.tar.bz2 | |
Remove dependence on cl
Diffstat (limited to 'init.el')
| -rw-r--r-- | init.el | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -30,11 +30,11 @@ (set-face-background 'default "black") (set-face-foreground 'default "white") (add-to-list 'default-frame-alist '(background-mode . dark)) -(require 'cl) +(require 'seq) (when window-system (defun font-candidate (&rest fonts) "Return existing font which first match." - (find-if (lambda (f) (find-font (font-spec :name f))) fonts)) + (seq-find (lambda (f) (find-font (font-spec :name f))) fonts)) (let ((fontval (font-candidate "Source Code Pro"))) (when fontval (set-face-attribute 'default nil :font fontval :height 110))) (when (find-font (font-spec :name "Symbola")) |