2015-06-15 09:06:10 +02:00
|
|
|
;;; module-markdown.el
|
|
|
|
|
;; see lib/markdown-defuns.el
|
|
|
|
|
|
|
|
|
|
(use-package markdown-mode
|
|
|
|
|
:mode (("\\.md$" . markdown-mode)
|
|
|
|
|
("/README$" . markdown-mode))
|
|
|
|
|
:functions (markdown-use-region-p
|
|
|
|
|
markdown-unwrap-things-in-region
|
|
|
|
|
markdown-wrap-or-insert
|
|
|
|
|
markdown-unwrap-thing-at-point)
|
2015-09-30 13:47:57 -04:00
|
|
|
:init
|
|
|
|
|
(add-hook! markdown-mode 'narf|enable-hard-wrap)
|
2015-06-15 09:06:10 +02:00
|
|
|
:config
|
|
|
|
|
(bind! :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-`" 'narf/markdown-insert-del
|
|
|
|
|
|
|
|
|
|
(:prefix "," ; <leader>
|
|
|
|
|
:nv "i" 'markdown-insert-image
|
|
|
|
|
:nv "l" 'markdown-insert-link
|
|
|
|
|
:nv "L" 'markdown-insert-reference-link-dwim
|
|
|
|
|
:nv "b" 'markdown-preview)
|
|
|
|
|
|
|
|
|
|
;; TODO: Make context sensitive
|
|
|
|
|
:n "[p" 'markdown-promote
|
|
|
|
|
:n "]p" 'markdown-demote
|
|
|
|
|
|
|
|
|
|
:i "M--" 'markdown-insert-hr))
|
|
|
|
|
|
|
|
|
|
;; TODO: Test previewing capability
|
|
|
|
|
|
|
|
|
|
(provide 'module-markdown)
|
|
|
|
|
;;; module-markdown.el ends here
|
