;;; 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)
  :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