From 284c8327c95bb0c71b111ebf95723a35a478295c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ra=C3=BAl=20Benencia?= Date: Sun, 23 Jun 2019 11:43:30 -0700 Subject: Add emacs config --- .emacs.local.d/modes/writeroom.el | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100644 .emacs.local.d/modes/writeroom.el (limited to '.emacs.local.d/modes/writeroom.el') diff --git a/.emacs.local.d/modes/writeroom.el b/.emacs.local.d/modes/writeroom.el new file mode 100644 index 0000000..ba700a1 --- /dev/null +++ b/.emacs.local.d/modes/writeroom.el @@ -0,0 +1,27 @@ +(use-package writeroom-mode + :defer t + :config + (setq writeroom-width 140 + writeroom-mode-line nil + writeroom-global-effects '(writeroom-set-bottom-divider-width + writeroom-set-internal-border-width + (lambda (arg) + (let ((langs '("python" + "emacs-lisp" + "common-lisp" + "js" + "ruby"))) + (cond + ((= arg 1) + (progn + (setq org-src-block-faces + (mapcar (lambda (lang) (list lang '(:family "Source Code Pro" :height 0.8))) langs)) + (normal-mode) + (variable-pitch-mode))) + ((= arg -1) + (progn + (setq org-src-block-faces + (mapcar (lambda (lang) (list lang '(:family "Source Code Pro" :height 1.0))) langs)) + (normal-mode) + (variable-pitch-mode) +(variable-pitch-mode))))))))) -- cgit v1.2.3