summary refs log tree commit diff stats
path: root/emacs/.emacs.d/main.el
diff options
context:
space:
mode:
authorAlan Pearce2017-10-18 12:35:52 +0200
committerAlan Pearce2017-10-18 12:35:52 +0200
commit0a297c13575bcc98c037219017da3a2695a33eee (patch)
tree337fc42ea854a4670c237d500a07696843fb81b4 /emacs/.emacs.d/main.el
parent75c5e4df2e02756caded5047806d5e7794eea3bb (diff)
downloadnixfiles-0a297c13575bcc98c037219017da3a2695a33eee.tar.lz
nixfiles-0a297c13575bcc98c037219017da3a2695a33eee.tar.zst
nixfiles-0a297c13575bcc98c037219017da3a2695a33eee.zip
Emacs: Add use-fixed-fonts function
Counterpart to use-variable fonts
Diffstat (limited to 'emacs/.emacs.d/main.el')
-rw-r--r--emacs/.emacs.d/main.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el
index 7508dd0f..1b30808f 100644
--- a/emacs/.emacs.d/main.el
+++ b/emacs/.emacs.d/main.el
@@ -172,6 +172,11 @@
     (variable-pitch-mode)
     (setq cursor-type '(bar . 1)))
 
+  (defun use-fixed-fonts ()
+    (interactive)
+    (variable-pitch-mode -1)
+    (setq cursor-type 'box))
+
   (defun ap/set-fonts (mono-face mono-font-size variable-face variable-font-size antialias &optional new-line-spacing)
     (if (boundp 'ns-antialias-text)
         (setq ns-antialias-text antialias))