From 7bb251b0f4e42211bbb722d513619149ba9b8e7f Mon Sep 17 00:00:00 2001 From: Pierre Neidhardt Date: Tue, 28 Apr 2020 11:32:27 +0200 Subject: [PATCH] trashed: Init. --- evil-collection.el | 1 + modes/trashed/evil-collection-trashed.el | 92 ++++++++++++++++++++++++ 2 files changed, 93 insertions(+) create mode 100644 modes/trashed/evil-collection-trashed.el diff --git a/evil-collection.el b/evil-collection.el index 52f270c..1f4e0a7 100644 --- a/evil-collection.el +++ b/evil-collection.el @@ -230,6 +230,7 @@ through removing their entry from `evil-collection-mode-list'." tetris tide transmission + trashed typescript-mode vc-annotate vc-dir diff --git a/modes/trashed/evil-collection-trashed.el b/modes/trashed/evil-collection-trashed.el new file mode 100644 index 0000000..dd008ae --- /dev/null +++ b/modes/trashed/evil-collection-trashed.el @@ -0,0 +1,92 @@ +;;; evil-collection-trashed.el --- Evil bindings for trashed.el -*- lexical-binding: t -*- + +;; Copyright (C) 2020 Pierre Neidhardt + +;; Author: Pierre Neidhardt +;; Maintainer: James Nguyen +;; Pierre Neidhardt +;; URL: https://github.com/emacs-evil/evil-collection +;; Version: 0.0.3 +;; Package-Requires: ((emacs "25.1")) +;; Keywords: evil, files, convenience, tools + +;; 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 `trashed'. + +;;; Code: +(require 'evil-collection) +(require 'trashed nil t) + +(defconst evil-collection-trashed-maps '(trashed-mode-map)) + +;;;###autoload +(defun evil-collection-trashed-setup () + "Set up `evil' bindings for `trashed'." + (evil-collection-inhibit-insert-state 'trashed-mode-map) + (evil-collection-define-key 'normal 'trashed-mode-map + ;; motion + (kbd "SPC") 'scroll-up-command + (kbd "S-SPC") 'scroll-down-command + (kbd "") 'trashed-forward-column + (kbd "") 'trashed-backward-column + + (kbd "RET") 'trashed-find-file + (kbd "S-RET") 'trashed-find-file-other-window + (kbd "go") 'trashed-find-file-other-window + (kbd "gO") 'trashed-display-file + (kbd "gw") 'trashed-browse-url-of-file + (kbd "M-RET") 'trashed-display-file + + "S" 'tabulated-list-sort + + "m" 'trashed-mark + "M" 'trashed-mark-all + "u" 'trashed-unmark + "U" 'trashed-unmark-all + "~" 'trashed-toggle-marks + + "$ m" 'trashed-mark-files-by-date + "$ u" 'trashed-unmark-files-by-date + "$ d" 'trashed-flag-delete-files-by-date + "$ r" 'trashed-flag-restore-files-by-date + + "% m" 'trashed-mark-files-regexp + "% u" 'trashed-unmark-files-regexp + "% d" 'trashed-flag-delete-files-regexp + "% r" 'trashed-flag-restore-files-regexp + + "d" 'trashed-flag-delete + "r" 'trashed-flag-restore + + "zb" 'trashed-flag-backup-files + "za" 'trashed-flag-auto-save-files + + "x" 'trashed-do-execute + "D" 'trashed-do-delete + "R" 'trashed-do-restore + + "v" 'trashed-view-file + + "g?" 'describe-mode + "gr" 'revert-buffer + + ;; quit + "q" 'quit-window + "ZQ" 'evil-quit + "ZZ" 'quit-window)) + +(provide 'evil-collection-trashed) +;;; evil-collection-trashed.el ends here