app/write: new +write-mode-map keymap
This commit is contained in:
parent
5c49d9c7c0
commit
c23974e1d5
1 changed files with 5 additions and 1 deletions
|
@ -1,10 +1,14 @@
|
||||||
;;; app/write/autoload.el -*- lexical-binding: t; -*-
|
;;; app/write/autoload.el -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defvar +write-mode-map (make-sparse-keymap)
|
||||||
|
"TODO")
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(define-minor-mode +write-mode
|
(define-minor-mode +write-mode
|
||||||
"Turns Emacs into a more comfortable writing environment and word processor."
|
"Turns Emacs into a more comfortable writing environment and word processor."
|
||||||
:init-value nil
|
:init-value nil
|
||||||
:keymap nil
|
:keymap +write-mode-map
|
||||||
(setq-local visual-fill-column-center-text t)
|
(setq-local visual-fill-column-center-text t)
|
||||||
(when +write-text-scale
|
(when +write-text-scale
|
||||||
(text-scale-set (if +write-mode 2 0)))
|
(text-scale-set (if +write-mode 2 0)))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue