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

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

[elpa] externals/objed 5dd9ed0 1/9: Make C-x C-key actions available via


From: Clemens Radermacher
Subject: [elpa] externals/objed 5dd9ed0 1/9: Make C-x C-key actions available via x prefix
Date: Mon, 4 Mar 2019 07:46:21 -0500 (EST)

branch: externals/objed
commit 5dd9ed0e7858441060202767c8d8d9f295ddfb49
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    Make C-x C-key actions available via x prefix
---
 objed.el | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/objed.el b/objed.el
index 92b7381..ac4a14e 100644
--- a/objed.el
+++ b/objed.el
@@ -802,16 +802,22 @@ Other single character keys are bound to 
`objed-undefined'."
 
 (defvar objed-op-map
   (let ((map (objed--define-prefix "x" 'objed-op-map)))
+    ;; apply region command on object
     (define-key map "x" 'objed-op-x)
-
+    ;; todo: show object op hydra command
     (define-key map "c"
       ;; upcase, downcase, capitalize, reformat
       (objed-define-op nil objed-case-op))
 
-    ;; experimental
     (define-key map "e" 'objed-eval)
-    ;; uses edit-indirect if av., via prefix
     (define-key map "n" 'objed-narrow)
+    ;; actions analog to C-x C-KEY which exit
+    (define-key map "s" 'save-buffer)
+    (define-key map "f" 'find-file)
+    (define-key map "w" 'write-file)
+    (define-key map "v" 'find-alternate-file)
+    (define-key map "b" 'switch-to-buffer)
+
     map)
   "Map for additional operations called via a prefix from `objed-map'.
 



reply via email to

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