actual final changes and get rid of junk in lisp dir

actually works fine

1 files changed, 0 insertions, 138 deletions

diff --git a/.config/emacs/lisp/evil-collection/modes/ement/evil-collection-ement.el b/.config/emacs/lisp/evil-collection/modes/ement/evil-collection-ement.el
deleted file mode 100644
index a9c7a1b..0000000
--- a/.config/emacs/lisp/evil-collection/modes/ement/evil-collection-ement.el
+++ /dev/null
@@ -1,138 +0,0 @@
-;;; evil-collection-ement.el --- Evil integration for Ement.el  -*- lexical-binding: t; -*-
-
-;; Copyright (C) 2023  Nicholas Vollmer
-
-;; Author:  Nicholas Vollmer
-;; Keywords: convenience
-;; Maintainer: James Nguyen <james@jojojames.com>
-;; URL: https://github.com/emacs-evil/evil-collection
-;; Version: 0.0.0
-;; Package-Requires: ((emacs "27.1"))
-;; Keywords: evil, emacs, 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 <https://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; Evil bindings for Ement.el
-
-;;; Code:
-(require 'evil-collection)
-(require 'ement nil t)
-(require 'ement-room-list nil t)
-
-(defgroup evil-collection-ement nil
-  "Evil bindings for Ement.el."
-  :group 'evil-collection)
-
-(defcustom evil-collection-ement-want-auto-retro nil
-  "When non-nil, automatically run `ement-room-retro' when scrolled up at `bob'."
-  :type 'boolean)
-
-(defconst evil-collection-ement-maps '(ement-describe-room-mode-map
-                                       ement-directory-mode-map
-                                       ement-room-list-mode-map
-                                       ement-room-mode-map))
-
-(declare-function ement-room-retro "ement-room")
-(defun evil-collection-ement--auto-retro ()
-  "Call `ement-room-retro' scroll requested from beginning of buffer hit."
-  (and (= (line-beginning-position) (point-min))
-       (not (eq evil-state 'emacs))
-       (member this-command '(previous-line evil-scroll-up))
-       (call-interactively #'ement-room-retro)
-       (setq this-command 'ement-room-retro)))
-
-(defun evil-collection-ement--install-auto-retro ()
-  "Install `evil-collection-ement--auto-retro'."
-  (add-hook 'post-command-hook #'evil-collection-ement--auto-retro nil t))
-
-(defun evil-collection-ement-setup ()
-  "Set up `evil' bindings for Ement.el."
-  (evil-collection-define-key 'normal 'ement-describe-room-mode-map
-    (kbd "q") 'quit-window)
-
-  (evil-collection-define-key 'normal 'ement-directory-mode-map
-    (kbd "RET")      'ement-directory-RET
-    (kbd "<return>") 'ement-directory-RET
-    (kbd "s")        'ement-directory-search
-    (kbd "q")        'quit-window)
-
-  (evil-collection-define-key 'normal 'ement-room-list-mode-map
-    (kbd "d")     'ement-room-list-kill-buffer
-    (kbd "x")     'ement-room-leave
-    (kbd "X")     'ement-forget-room
-    (kbd "RET")   'ement-room-list-RET
-    (kbd "<return>") 'ement-room-list-RET)
-
-  (let* ((submit evil-collection-repl-submit-state)
-         (newline-state (if (eq submit 'normal) 'insert 'normal)))
-    (evil-collection-define-key submit 'ement-room-mode-map
-      (kbd "<return>") 'ement-room-send-message
-      (kbd "RET") 'ement-room-send-message)
-    (evil-collection-define-key newline-state 'ement-room-mode-map
-      (kbd "<return>") 'newline
-      (kbd "RET") 'newline))
-
-  (evil-collection-define-key '(normal motion) 'ement-room-mode-map
-    (kbd "<")  'ement-room-transient
-    (kbd "M-RET")      'ement-room-compose-message
-    (kbd "<M-return>") 'ement-room-compose-message
-    (kbd "a")  'ement-room-send-message
-    (kbd "A")  'ement-room-compose-message
-    (kbd "d")  'ement-room-delete-message
-    (kbd "D")  'ement-room-delete-message
-    (kbd "J")  'ement-room-write-reply
-    (kbd "]]") 'ement-room-goto-next
-    (kbd "[[") 'ement-room-goto-prev
-    (kbd "gr") 'ement-room-sync
-    (kbd "gu") 'ement-room-goto-fully-read-marker
-    (kbd "gm") 'ement-room-mark-read
-    (kbd "gv") 'ement-room-view-event
-    (kbd "i")  'ement-room-edit-message
-    (kbd "q")  'quit-window
-    ;; Room prefix bindings
-    (kbd "r/") 'ement-room-occur
-    (kbd "rd") 'ement-room-describe
-    (kbd "rf") 'ement-room-set-message-format
-    (kbd "rl") 'ement-room-list
-    (kbd "rm") 'ement-list-members
-    (kbd "rn") 'ement-room-override-name
-    (kbd "rN") 'ement-room-set-notification-state
-    (kbd "rt") 'ement-room-set-topic
-    (kbd "rT") 'ement-tag-room
-    ;; Room membership
-    (kbd "Rc") 'ement-create-room
-    (kbd "Rj") 'ement-room-join
-    (kbd "Rl") 'ement-room-leave
-    (kbd "RF") 'ement-room-forget
-    (kbd "Rn") 'ement-room-set-display-name
-    (kbd "Rs") 'ement-room-toggle-space
-    ;; Send prefix bindings
-    (kbd "se") 'ement-room-send-emote
-    (kbd "sf") 'ement-room-send-file
-    (kbd "si") 'ement-room-send-image
-    (kbd "sr") 'ement-room-send-reaction
-    ;; User prefix bindings
-    (kbd "ui") 'ement-invite-user
-    (kbd "uI") 'ement-ignore-user
-    (kbd "u RET")      'ement-send-direct-message
-    (kbd "u <return>") 'ement-send-direct-message)
-
-  (when evil-collection-ement-want-auto-retro
-    (add-hook 'ement-room-mode-hook  #'evil-collection-ement--install-auto-retro))
-  nil)
-
-(provide 'evil-collection-ement)
-;;; evil-collection-ement.el ends here