aboutsummaryrefslogtreecommitdiff
path: root/.emacs.local.d
diff options
context:
space:
mode:
authorRaul Benencia <id@rbenencia.name>2022-10-02 14:45:36 -0700
committerRaul Benencia <id@rbenencia.name>2022-10-02 14:45:48 -0700
commit77c6924a6815c54a66bb228b5b47c49f9fca8feb (patch)
tree5ade6feb85b729dddf980d22616faf33d09f56eb /.emacs.local.d
parent4dd855385f1ba0eac73003f557ec6cdb211d4a81 (diff)
emacs: logos mode
Diffstat (limited to '.emacs.local.d')
-rw-r--r--.emacs.local.d/modes/logos.el25
1 files changed, 25 insertions, 0 deletions
diff --git a/.emacs.local.d/modes/logos.el b/.emacs.local.d/modes/logos.el
new file mode 100644
index 0000000..2484125
--- /dev/null
+++ b/.emacs.local.d/modes/logos.el
@@ -0,0 +1,25 @@
+(require 'logos)
+
+;; If you want to use outlines instead of page breaks (the ^L)
+(setq logos-outlines-are-pages t)
+(setq logos-outline-regexp-alist
+ `((emacs-lisp-mode . "^;;;+ ")
+ (org-mode . "^\\*+ +")
+ (markdown-mode . "^\\#+ +")
+ (t . ,(or outline-regexp logos--page-delimiter))))
+
+;; These apply when `logos-focus-mode' is enabled. Their value is
+;; buffer-local.
+(setq-default logos-hide-mode-line t
+ logos-hide-buffer-boundaries t
+ logos-hide-fringe t
+ logos-variable-pitch nil
+ logos-buffer-read-only nil
+ logos-scroll-lock nil
+ logos-olivetti t)
+
+(let ((map global-map))
+ (define-key map [remap narrow-to-region] #'logos-narrow-dwim)
+ (define-key map [remap forward-page] #'logos-forward-page-dwim)
+ (define-key map [remap backward-page] #'logos-backward-page-dwim)
+)
nihil fit ex nihilo