[emacs] [fonts] Add Noto Serif and org-mode serif fonts

This commit is contained in:
Colin Powell
2020-04-08 00:37:40 -04:00
parent 3992132682
commit 9328f2afea
76 changed files with 52 additions and 17 deletions

View File

@ -21,15 +21,16 @@ I change my default theme almost as often as the weather. I tend to revert back
to Doom One most of the time, but I like the Kaolin themes, as well as Nimbus
for it's retro charm. Nimbus just doesn't look great when I'm tired though.
I love [[https://blog.golang.org/go-fonts][Go Mono]]. But sometimes Emacs is sensitive to fonts and performance
suffers, so we have Fira Mono to fall back on.
I love [[https://blog.golang.org/go-fonts][Go Mono]]. But sometimes Emacs is sensitive
to fonts and performance suffers, so we have Fira Mono to fall back on.
#+BEGIN_SRC emacs-lisp
(setq doom-font (font-spec :family "FuraCode Nerd Font Mono" :size 12))
(setq doom-big-font (font-spec :family "FuraCode Nerd Font Mono" :size 17))
(setq doom-theme 'doom-monokai-spectrum)
(setq doom-font (font-spec :family "FuraCode Nerd Font Mono" :size 12)
doom-big-font (font-spec :family "FuraCode Nerd Font Mono" :size 17)
doom-variable-pitch-font (font-spec :family "Noto Serif" :size 12)
doom-serif-font (font-spec :family "FuraCode Nerd Font Mono")
doom-theme 'srcery)
#+END_SRC
** Borders
Barring the unfortunate end of X11 development and my eventual transition to
wayland and sway, you can pry i3wm from my cold, dead hands. One problem,
@ -38,14 +39,14 @@ border.
#+BEGIN_SRC emacs-lisp
;; Applies to current frame
(set-frame-parameter nil 'internal-border-width 20) ; applies to the current frame
(set-frame-parameter nil 'internal-border-width 30) ; applies to the current frame
;; If we create new frames (via emacsclient) this will do the trick
(add-to-list 'default-frame-alist '(internal-border-width . 20))
(add-to-list 'default-frame-alist '(internal-border-width . 30))
;; Dash highlighting
(after! dash (dash-enable-font-lock))
#+END_SRC
** Dash
I need to figure out what this doesr, hence the task below.
I need to figure out what this does, hence the task below.
#+BEGIN_SRC emacs-lisp
;; Dash highlighting
(after! dash (dash-enable-font-lock))
@ -211,16 +212,45 @@ Helpful modes to make working less painful.
#+END_SRC
* Org-mode
** Basic configuration
Do I use deft? Not really. Every once in a while I think I will. This makes sure
it works when I get an impulse.
#+BEGIN_SRC emacs-lisp
;; tools/deft
(setq deft-extensions '("org"))
(setq deft-directory "~/org")
#+END_SRC
A handful of mods here clean up org mode. Line numbers dont mean much when
youre folding and unfolding all the time. I also really enjoy the typography of
a serif font when Im writing a lot of words.
#+BEGIN_SRC emacs-lisp
(add-hook 'org-mode-hook #'doom-disable-line-numbers-h)
(add-hook 'org-mode-hook 'typo-mode)
; For org mode serif
(add-hook 'org-mode-hook 'variable-pitch-mode)
(add-hook 'org-mode-hook
'(lambda ()
(mapc
(lambda (face) ;; Other fonts with fixed-pitch.
(set-face-attribute face nil :inherit 'fixed-pitch))
(list 'org-link
'org-block
'org-table
'org-block-begin-line
'org-block-end-line))))
(add-hook 'org-mode-hook #'auto-fill-mode)
(remove-hook 'org-mode-hook #'word-wrap-mode)
#+END_SRC
#+BEGIN_SRC emacs-lisp
(after! org
(setq org-directory (expand-file-name "~/org/")
org-agenda-files (list org-directory)
org-agenda-window-setup 'only-window
org-pretty-entities t
org-agenda-dim-blocked-tasks nil
org-log-done 'time
org-fontify-whole-heading-line t
org-fontify-done-headline t
@ -245,6 +275,10 @@ Helpful modes to make working less painful.
org-drill
org-id)))
;; Dont display git gutter in org mode
(after! git-gutter
(setq git-gutter:disabled-modes '(org-mode image-mode)))
;; Refiling
(setq org-refile-targets '((nil :maxlevel . 9)
(org-agenda-files :maxlevel . 9)))