Fix typo and tweak indentation

This commit is contained in:
Gerard Vermeulen 2021-12-07 06:22:01 +01:00
parent 374a17e15b
commit 94232025e8
1 changed files with 7 additions and 7 deletions

View File

@ -1248,14 +1248,14 @@ the next source code block shows.
Scale all other faces with a height that is a real number."
(interactive)
(let* ((prompt (format "face heigth (%s): " (face-attribute 'default :height)))
(let* ((prompt (format "face heigth (%s): "
(face-attribute 'default :height)))
(choices (mapcar #'number-to-string
(number-sequence 50 200 10)))
(height (string-to-number
(completing-read
prompt
(mapcar #'number-to-string (number-sequence 50 200 10))
nil 'require-match))))
(message "Setting the height of the default face to %s" new)
(set-face-attribute 'default nil :height new)))
(completing-read prompt choices nil 'require-match))))
(message "Setting the height of the default face to %s" height)
(set-face-attribute 'default nil :height height)))
#+end_src
This setup prefers the ~leuven~ and ~leuven-dark~ themes from [[https://melpa.org/#/][MELPA]], because the