(require 'evil) (require 'mermaid-mode) (define-minor-mode evil-mermaid-mode "Buffer local minor mode for evil-mermaid" :init-value nil :lighter "EvilMermaid" :keymap (make-sparse-keymap) :group 'evil-mermaid) (add-hook 'mermaid-mode-hook 'evil-mermaid-mode) (mapc #'(lambda (state) (evil-define-key state evil-mermaid-mode-map (kbd "M-c") 'mermaid-compile (kbd "M-v") 'mermaid-view )) '(normal insert)) (provide 'evil-mermaid)