emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/tablist bf2e139 04/60: Fixed some bindings.


From: Philip Kaludercic
Subject: [nongnu] elpa/tablist bf2e139 04/60: Fixed some bindings.
Date: Sun, 1 Aug 2021 18:19:24 -0400 (EDT)

branch: elpa/tablist
commit bf2e13978f76d1f9a449f823b95c7bed8643c8dd
Author: Andreas Politz <politza@hochschule-trier.de>
Commit: Andreas Politz <politza@hochschule-trier.de>

    Fixed some bindings.
---
 tablist.el | 30 +++++++++++++++---------------
 1 file changed, 15 insertions(+), 15 deletions(-)

diff --git a/tablist.el b/tablist.el
index aff88b8..3911530 100644
--- a/tablist.el
+++ b/tablist.el
@@ -22,8 +22,8 @@
 ;;
 ;; This package adds marks and filters to tabulated-list-mode.  
 ;;
-;; It can be used by either deriving from tablist-mode, or by using
-;; tablist-minor-mode inside a tabulated-list-mode buffer.
+;; It can be used by deriving from tablist-mode and some features by
+;; using tablist-minor-mode inside a tabulated-list-mode buffer.
 ;;
 ;;
 ;; Ideas:
@@ -87,7 +87,7 @@
 
 (defvar tablist-mode-regexp-map
   (let ((kmap (make-sparse-keymap)))
-    (define-key kmap "&" 'tablist-flag-gargabe-items)
+    ;; (define-key kmap "&" 'tablist-flag-gargabe-items)
     (define-key kmap "m" 'tablist-mark-items-regexp)
     kmap))
 
@@ -95,16 +95,6 @@
   (let ((kmap (make-sparse-keymap)))
     (define-key kmap "m" 'tablist-mark-forward)
     (define-key kmap (kbd "DEL") 'tablist-unmark-backward)
-    (define-key kmap "d" 'tablist-flag-forward)
-    (define-key kmap (kbd "RET") 'tablist-find-entry)
-    (define-key kmap "f" 'tablist-find-entry)
-    ;; (define-key kmap "~" 'tablist-flag-gargabe-items)
-    (define-key kmap "D" 'tablist-do-delete)
-    ;; (define-key kmap "C" 'tablist-do-copy)
-    ;; (define-key kmap "R" 'tablist-do-rename)
-    (define-key kmap "x" 'tablist-do-flagged-delete)
-    ;; (define-key kmap "F" 'tablist-find-marked-items)
-    ;; (define-key kmap (kbd "C-o") 'tablist-display-item)
     (define-key kmap "k" 'tablist-do-kill-lines)
     (define-key kmap "U" 'tablist-unmark-all-marks)
     (define-key kmap "u" 'tablist-unmark-forward)
@@ -118,8 +108,8 @@
     (define-key kmap "*" tablist-mode-mark-map)
     (define-key kmap "/" tablist-mode-filter-map)
 
-    (define-key kmap "e" 'tablist-edit-column)
-    (define-key kmap "i" 'tablist-insert-entry)
+    ;; (define-key kmap "e" 'tablist-edit-column)
+    ;; (define-key kmap "i" 'tablist-insert-entry)
     (define-key kmap "s" 'tablist-sort)
     (define-key kmap [remap back-to-indentation] 'tablist-move-to-major-column)
     (define-key kmap [remap next-line] 'tablist-next-line)
@@ -134,6 +124,16 @@
 (defvar tablist-mode-map
   (let ((kmap (copy-keymap tablist-minor-mode-map)))
     (set-keymap-parent kmap tabulated-list-mode-map)
+    (define-key kmap "d" 'tablist-flag-forward)
+    (define-key kmap (kbd "RET") 'tablist-find-entry)
+    (define-key kmap "f" 'tablist-find-entry)
+    ;; (define-key kmap "~" 'tablist-flag-gargabe-items)
+    (define-key kmap "D" 'tablist-do-delete)
+    (define-key kmap "C" 'tablist-do-copy)
+    (define-key kmap "R" 'tablist-do-rename)
+    (define-key kmap "x" 'tablist-do-flagged-delete)
+    ;; (define-key kmap "F" 'tablist-find-marked-items)
+    ;; (define-key kmap (kbd "C-o") 'tablist-display-item)
     kmap))
 
   



reply via email to

[Prev in Thread] Current Thread [Next in Thread]