Add font and icon/nerd-font section

config.org

@@ -1053,6 +1053,45 @@ Inspired by https://github.com/org-roam/org-roam/wiki/User-contributed-Tricks#fi
                                   (org-roam-node-tags node))))))
 #+END_SRC
 
+** Font
+
+'Inspired' by https://protesilaos.com/codelog/2024-11-28-basic-emacs-configuration/#h:1e4fde73-a2a2-4dc5-82ad-02cf3884ece6 .
+#+BEGIN_SRC emacs-lisp
+(let ((mono-spaced-font "Monospace")
+      (proportionately-spaced-font "Sans"))
+  (set-face-attribute 'default nil :family mono-spaced-font :height 100)
+  (set-face-attribute 'fixed-pitch nil :family mono-spaced-font :height 1.0)
+  (set-face-attribute 'variable-pitch nil :family proportionately-spaced-font :height 1.0))
+#+END_SRC
+
+*** Icon fonts
+
+To make this setup work, the user must type M-x and then call the
+command 'nerd-icons-install-fonts'. This will store the icon font files
+in a local directory (on Linux this is ~/.local/share/fonts).
+
+#+BEGIN_SRC emacs-lisp
+(use-package nerd-icons
+  :ensure t)
+
+(use-package nerd-icons-completion
+  :ensure t
+  :after marginalia
+  :config
+  (add-hook 'marginalia-mode-hook #'nerd-icons-completion-marginalia-setup))
+
+(use-package nerd-icons-corfu
+  :ensure t
+  :after corfu
+  :config
+  (add-to-list 'corfu-margin-formatters #'nerd-icons-corfu-formatter))
+
+(use-package nerd-icons-dired
+  :ensure t
+  :hook
+  (dired-mode . nerd-icons-dired-mode))
+#+END_SRC
+
 ** Sudo current buffer
 
 #+BEGIN_SRC emacs-lisp