tastytea/.emacs.d
tastytea
/
.emacs.d
1
0
Fork 0
Code Issues Pull Requests Releases Activity

Emacs: Use Noto Color Emoji for emojis.

This commit is contained in:
tastytea 2020-03-24 22:38:17 +01:00
parent 65395eae6b
commit 070de22922
1 changed files with 15 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
init.d/basics/appearance.el
View File

@ -1,6 +1,6 @@
;;; appearance.el --- Configure appearance. -*- lexical-binding: t; -*-
;; Time-stamp: <2020-03-18T14:51:46+0100>
;; Time-stamp: <2020-03-24T22:37:57+0100>
;;; Commentary:
@ -20,14 +20,20 @@
(uniquify-buffer-name-style 'post-forward)
(uniquify-strip-common-suffix t))
:config (progn
(tool-bar-mode -1) ; Hide toolbar.
(if (display-graphic-p)
(set-scroll-bar-mode 'right)) ; Put scrollbar to the right side.
(add-to-list 'default-frame-alist ; Set default font.
'(font . "Source Code Pro-10"))
(global-hl-line-mode t) ; Highlight current line.
(show-paren-mode t) ; Visualize matching parens.
(setq frame-title-format ; Show filename in frame title.
(defun my/set-default-fonts ()
"Set the default font and the emoji font."
(when (member "Source Code Pro" (font-family-list)) ; Default.
(set-frame-font "Source Code Pro-10" t t))
(when (member "Noto Color Emoji" (font-family-list)) ; Emojis.
(set-fontset-font t 'unicode "Noto Color Emoji" nil 'prepend)))
(tool-bar-mode -1) ; Hide toolbar.
(when (display-graphic-p)
(set-scroll-bar-mode 'right)) ; Put scrollbar to the right side.
(my/set-default-fonts)
(global-hl-line-mode t) ; Highlight current line.
(show-paren-mode t) ; Visualize matching parens.
(setq frame-title-format ; Show filename in frame title.
'(multiple-frames
"%b" ("" invocation-name "@" system-name
" – " buffer-file-truename)))))