ebe4c60264
This reverts commit 29c78ce841 and all other fixes
that have been made afterwards.
The motivation is that use-package is seen by many as a replacement for
`require`. Is use-package always defer the loading of packages then is breaks
this use case, this does not respect POLA so even if it was making Spacemacs
loading faster (up to 3s faster on some startup on my machine) we just cannot
use it, it would be irresponsible. Spacemacs should be easy to use, loading
performance will come with time but it is not a priority.
173 lines
6.1 KiB
EmacsLisp
173 lines
6.1 KiB
EmacsLisp
;;; packages.el --- Markdown Layer packages File for Spacemacs
|
|
;;
|
|
;; Copyright (c) 2012-2018 Sylvain Benner & Contributors
|
|
;;
|
|
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;;; License: GPLv3
|
|
|
|
(setq markdown-packages
|
|
'(
|
|
company
|
|
company-emoji
|
|
emoji-cheat-sheet-plus
|
|
gh-md
|
|
markdown-mode
|
|
markdown-toc
|
|
mmm-mode
|
|
smartparens
|
|
(vmd-mode :toggle (eq 'vmd markdown-live-preview-engine))
|
|
))
|
|
|
|
(defun markdown/post-init-company ()
|
|
(dolist (mode markdown--key-bindings-modes)
|
|
(eval `(spacemacs|add-company-backends
|
|
:backends company-capf
|
|
:modes ,mode))))
|
|
|
|
(defun markdown/post-init-company-emoji ()
|
|
(dolist (mode markdown--key-bindings-modes)
|
|
(eval `(spacemacs|add-company-backends
|
|
:backends company-emoji
|
|
:modes ,mode))))
|
|
|
|
(defun markdown/post-init-emoji-cheat-sheet-plus ()
|
|
(add-hook 'markdown-mode-hook 'emoji-cheat-sheet-plus-display-mode))
|
|
|
|
(defun markdown/init-gh-md ()
|
|
(use-package gh-md
|
|
:defer t
|
|
:init
|
|
(dolist (mode markdown--key-bindings-modes)
|
|
(spacemacs/set-leader-keys-for-major-mode mode
|
|
"cr" 'gh-md-render-buffer))))
|
|
|
|
(defun markdown/post-init-smartparens ()
|
|
(add-hook 'markdown-mode-hook 'smartparens-mode))
|
|
|
|
(defun markdown/init-markdown-mode ()
|
|
(use-package markdown-mode
|
|
:mode
|
|
(("\\.m[k]d" . markdown-mode)
|
|
("\\.mdk" . markdown-mode))
|
|
:defer t
|
|
:config
|
|
(progn
|
|
(add-hook 'markdown-mode-hook 'orgtbl-mode)
|
|
(spacemacs|diminish orgtbl-mode)
|
|
(add-hook 'markdown-mode-hook 'spacemacs//cleanup-org-tables-on-save)
|
|
;; Declare prefixes and bind keys
|
|
(dolist (prefix '(("mc" . "markdown/command")
|
|
("mh" . "markdown/header")
|
|
("mi" . "markdown/insert")
|
|
("ml" . "markdown/lists")
|
|
("mx" . "markdown/text")))
|
|
(dolist (mode markdown--key-bindings-modes)
|
|
(spacemacs/declare-prefix-for-mode
|
|
mode (car prefix) (cdr prefix))))
|
|
(dolist (mode markdown--key-bindings-modes)
|
|
(spacemacs/set-leader-keys-for-major-mode mode
|
|
;; Movement
|
|
"{" 'markdown-backward-paragraph
|
|
"}" 'markdown-forward-paragraph
|
|
;; Completion, and Cycling
|
|
"]" 'markdown-complete
|
|
;; Indentation
|
|
">" 'markdown-indent-region
|
|
"<" 'markdown-exdent-region
|
|
;; Buffer-wide commands
|
|
"c]" 'markdown-complete-buffer
|
|
"cc" 'markdown-check-refs
|
|
"ce" 'markdown-export
|
|
"cm" 'markdown-other-window
|
|
"cn" 'markdown-cleanup-list-numbers
|
|
"co" 'markdown-open
|
|
"cp" 'markdown-preview
|
|
"cv" 'markdown-export-and-preview
|
|
"cw" 'markdown-kill-ring-save
|
|
;; headings
|
|
"hi" 'markdown-insert-header-dwim
|
|
"hI" 'markdown-insert-header-setext-dwim
|
|
"h1" 'markdown-insert-header-atx-1
|
|
"h2" 'markdown-insert-header-atx-2
|
|
"h3" 'markdown-insert-header-atx-3
|
|
"h4" 'markdown-insert-header-atx-4
|
|
"h5" 'markdown-insert-header-atx-5
|
|
"h6" 'markdown-insert-header-atx-6
|
|
"h!" 'markdown-insert-header-setext-1
|
|
"h@" 'markdown-insert-header-setext-2
|
|
;; Insertion of common elements
|
|
"-" 'markdown-insert-hr
|
|
"if" 'markdown-insert-footnote
|
|
"ii" 'markdown-insert-image
|
|
"ik" 'spacemacs/insert-keybinding-markdown
|
|
"iI" 'markdown-insert-reference-image
|
|
"il" 'markdown-insert-inline-link-dwim
|
|
"iL" 'markdown-insert-reference-link-dwim
|
|
"iw" 'markdown-insert-wiki-link
|
|
"iu" 'markdown-insert-uri
|
|
;; Element removal
|
|
"k" 'markdown-kill-thing-at-point
|
|
;; List editing
|
|
"li" 'markdown-insert-list-item
|
|
;; Toggles
|
|
"ti" 'markdown-toggle-inline-images
|
|
"tl" 'markdown-toggle-url-hiding
|
|
"tt" 'markdown-toggle-gfm-checkbox
|
|
"tw" 'markdown-toggle-wiki-links
|
|
;; region manipulation
|
|
"xb" 'markdown-insert-bold
|
|
"xi" 'markdown-insert-italic
|
|
"xc" 'markdown-insert-code
|
|
"xC" 'markdown-insert-gfm-code-block
|
|
"xq" 'markdown-insert-blockquote
|
|
"xQ" 'markdown-blockquote-region
|
|
"xp" 'markdown-insert-pre
|
|
"xP" 'markdown-pre-region
|
|
;; Following and Jumping
|
|
"N" 'markdown-next-link
|
|
"f" 'markdown-follow-thing-at-point
|
|
"P" 'markdown-previous-link
|
|
"<RET>" 'markdown-jump)
|
|
(when (eq 'eww markdown-live-preview-engine)
|
|
(spacemacs/set-leader-keys-for-major-mode mode
|
|
"cP" 'markdown-live-preview-mode)))
|
|
;; Header navigation in normal state movements
|
|
(evil-define-key 'normal markdown-mode-map
|
|
"gj" 'outline-forward-same-level
|
|
"gk" 'outline-backward-same-level
|
|
"gh" 'outline-up-heading
|
|
;; next visible heading is not exactly what we want but close enough
|
|
"gl" 'outline-next-visible-heading)
|
|
;; Promotion, Demotion
|
|
(define-key markdown-mode-map (kbd "M-h") 'markdown-promote)
|
|
(define-key markdown-mode-map (kbd "M-j") 'markdown-move-down)
|
|
(define-key markdown-mode-map (kbd "M-k") 'markdown-move-up)
|
|
(define-key markdown-mode-map (kbd "M-l") 'markdown-demote))))
|
|
|
|
(defun markdown/init-markdown-toc ()
|
|
(use-package markdown-toc
|
|
:defer t
|
|
:init
|
|
(dolist (mode markdown--key-bindings-modes)
|
|
(spacemacs/set-leader-keys-for-major-mode mode
|
|
"it" 'markdown-toc-generate-toc))))
|
|
|
|
(defun markdown/init-mmm-mode ()
|
|
(use-package mmm-mode
|
|
:commands mmm-mode
|
|
:init (add-hook 'markdown-mode-hook 'spacemacs/activate-mmm-mode)
|
|
;; Automatically add mmm class for languages
|
|
:config (mapc 'markdown/mmm-auto-class markdown-mmm-auto-modes)))
|
|
|
|
(defun markdown/init-vmd-mode ()
|
|
(use-package vmd-mode
|
|
:defer t
|
|
:init
|
|
(dolist (mode markdown--key-bindings-modes)
|
|
(spacemacs/set-leader-keys-for-major-mode mode
|
|
"cP" 'vmd-mode))))
|