diff --git a/evil-collection.el b/evil-collection.el index 6bccc8e..062a52e 100644 --- a/evil-collection.el +++ b/evil-collection.el @@ -237,6 +237,7 @@ through removing their entry from `evil-collection-mode-list'." robe rtags ruby-mode + ,@(when (>= emacs-major-version 28) '(shortdoc)) simple slime sly diff --git a/modes/shortdoc/evil-collection-shortdoc.el b/modes/shortdoc/evil-collection-shortdoc.el new file mode 100644 index 0000000..4f12818 --- /dev/null +++ b/modes/shortdoc/evil-collection-shortdoc.el @@ -0,0 +1,47 @@ +;;; evil-collection-shortdoc.el --- Evil bindings for shortdoc -*- lexical-binding: t -*- + +;; Copyright (C) 2020 Zhiwei Chen + +;; Author: Zhiwei Chen +;; Maintainer: James Nguyen +;; Pierre Neidhardt +;; URL: https://github.com/emacs-evil/evil-collection +;; Version: 0.0.1 +;; TODO: Update to emacs 28.1 when it's out +;; Package-Requires: ((emacs "27.1")) +;; Keywords: evil, lisp, help + +;; This program is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . + +;;; Commentary: +;; Evil bindings for shortdoc. + +;;; Code: +(require 'evil-collection) +(require 'shortdoc nil t) + +(defconst evil-collection-shortdoc-maps '(shortdoc-mode-map)) + +;;;###autoload +(defun evil-collection-shortdoc-setup () + "Set up `evil' bindings for `shortdoc'." + (evil-set-initial-state 'shortdoc-mode 'normal) + (evil-collection-define-key 'normal 'shortdoc-mode-map + (kbd "C-k") 'shortdoc-previous + (kbd "C-j") 'shortdoc-next + "[[" 'shortdoc-previous-section + "]]" 'shortdoc-next-section)) + +(provide 'evil-collection-shortdoc) +;;; evil-collection-shortdoc.el ends here