c7254e7bdc
+ enable lexical-scope everywhere (lexical-binding = t): ~5-10% faster startup; ~5-20% general boost + reduce consing, function calls & garbage collection by preferring cl-loop & dolist over lambda closures (for mapc[ar], add-hook, and various cl-lib filter/map/reduce functions) -- where possible + prefer functions with dedicated opcodes, like assq (see byte-defop's in bytecomp.el for more) + prefer pcase & cond (faster) over cl-case + general refactor for code readability + ensure naming & style conventions are adhered to + appease byte-compiler by marking unused variables with underscore + defer minor mode activation to after-init, emacs-startup or window-setup hooks; a customization opportunity for users + ensures custom functionality won't interfere with startup.
58 lines
1.8 KiB
EmacsLisp
58 lines
1.8 KiB
EmacsLisp
;;; lang/markdown/config.el -*- lexical-binding: t; -*-
|
|
|
|
(def-package! markdown-mode
|
|
:mode ("\\.m\\(d\\|arkdown\\)$" "/README$"
|
|
("/README\\.md$" . gfm-mode))
|
|
:init
|
|
(setq markdown-enable-wiki-links t
|
|
markdown-enable-math t
|
|
markdown-italic-underscore t
|
|
markdown-make-gfm-checkboxes-buttons t
|
|
markdown-gfm-additional-languages '("sh"))
|
|
|
|
:config
|
|
(add-hook! markdown-mode
|
|
(auto-fill-mode +1)
|
|
(setq line-spacing 2
|
|
fill-column 80))
|
|
|
|
(sp-local-pair
|
|
'(markdown-mode gfm-mode)
|
|
"\`\`\`" "\`\`\`" :post-handlers '(("||\n" "RET")))
|
|
|
|
(map! :map gfm-mode-map
|
|
"`" #'self-insert-command
|
|
|
|
:map markdown-mode-map
|
|
"<backspace>" nil
|
|
"<M-left>" nil
|
|
"<M-right>" nil
|
|
"M-*" #'markdown-insert-list-item
|
|
"M-b" #'markdown-insert-bold
|
|
"M-i" #'markdown-insert-italic
|
|
"M-`" #'+markdown/insert-del
|
|
:m "gj" #'markdown-next-visible-heading
|
|
:m "gk" #'markdown-previous-visible-heading
|
|
;; Assumes you have a markdown renderer plugin in chrome
|
|
:n "M-r" #'browse-url-of-file
|
|
;; TODO: Make context sensitive
|
|
:n "[p" #'markdown-promote
|
|
:n "]p" #'markdown-demote
|
|
:n "[l" #'markdown-next-link
|
|
:n "]l" #'markdown-previous-link
|
|
:n "gf" #'markdown-follow-thing-at-point
|
|
:i "M--" #'markdown-insert-hr
|
|
|
|
:localleader
|
|
:nv "o" #'markdown-open
|
|
:nv "b" #'markdown-preview
|
|
(:prefix "i"
|
|
:nv "t" #'markdown-toc-generate-toc
|
|
:nv "i" #'markdown-insert-image
|
|
:nv "l" #'markdown-insert-link
|
|
:nv "L" #'markdown-insert-reference-link-dwim)))
|
|
|
|
|
|
(def-package! markdown-toc
|
|
:commands markdown-toc-generate-toc)
|
|
|