Those lines that got away :trollface:

3 files changed, 13 insertions, 5 deletions

diff --git a/blendoit/init-blendoit.org b/blendoit/init-blendoit.org
index f36161e..8851eed 100644
--- a/blendoit/init-blendoit.org
+++ b/blendoit/init-blendoit.org
@@ -87,6 +87,7 @@ Now, different shortcuts for other customization actions:
 #+NAME: shortcuts-customization
 #+BEGIN_SRC emacs-lisp
   (global-set-key (kbd "C-c v") 'customize-variable)
+  (global-set-key (kbd "C-c f") 'customize-face)
 #+END_SRC
 
 ** Backups
@@ -236,7 +237,7 @@ The following prettifies Org mode heading bullets:
 #+BEGIN_SRC emacs-lisp
 
 (let* ((variable-tuple
-        (cond ((x-list-fonts "Liberation Sans") '(:font "Liberation Sans"))
+        (cond ((x-list-fonts "Dejavu Serif") '(:font "Dejavu Serif"))
               ((x-family-fonts "Sans Serif")    '(:family "Sans Serif"))
               (nil (warn "Cannot find a Sans Serif Font.  Install Source Sans Pro."))))
        (base-font-color     (face-foreground 'default nil 'default))
@@ -491,12 +492,18 @@ This enables us to better manage our =.git= projects.
 ** Faces & cursors
 
 In order to imitate other modern text editors, we'll resort to a blinking bar
-cursor. The default cursor already blinks.
+cursor. We choose red, the most captivating color, because the cursor is
+arguably the region on our screen:
+
+1. most often looked at;
+2. most often searched when lost.
+
+The default cursor already blinks.
 
 *** Default cursor
 
 In files containing only fixed-pitch fonts (i.e. files containing only code),
-the cursor becomes more visible box.
+the cursor becomes a high-visibility box.
 
 #+BEGIN_SRC emacs-lisp
 (setq-default cursor-type (quote box))
diff --git a/blendoit/init-blendoit.pdf b/blendoit/init-blendoit.pdf
index 7507a93..29ec557 100644
--- a/blendoit/init-blendoit.pdf
+++ b/blendoit/init-blendoit.pdf
diff --git a/init-custom.el b/init-custom.el
index 9ebe86a..200eafe 100644
--- a/init-custom.el
+++ b/init-custom.el
@@ -140,7 +140,8 @@
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
  '(default ((t (:family "Hack" :foundry "SRC" :slant normal :weight normal :height 142 :width normal))))
- '(fixed-pitch ((t (:family "Dejavu Serif"))))
+ '(cursor ((t (:background "red"))))
+ '(fixed-pitch ((t (:height 0.8 :family "Hack"))))
  '(org-document-title ((t (:inherit default :weight bold :font "Liberation Sans" :height 2.0 :underline nil))))
  '(org-level-1 ((t (:inherit default :weight bold :font "Liberation Sans" :height 1.75))))
  '(org-level-2 ((t (:inherit default :weight bold :font "Liberation Sans" :height 1.5))))
@@ -150,4 +151,4 @@
  '(org-level-6 ((t (:inherit default :weight bold :font "Liberation Sans"))))
  '(org-level-7 ((t (:inherit default :weight bold :font "Liberation Sans"))))
  '(org-level-8 ((t (:inherit default :weight bold :font "Liberation Sans"))))
- '(variable-pitch ((t (:family "Liberation Sans")))))
+ '(variable-pitch ((t (:family "Dejavu Serif")))))