[elpa] externals/objed dc86d31 45/59: Change bindings for duplicate ops

[Clemens Radermacher]

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

    Change bindings for duplicate ops
---
 README.asc | 5 ++++-
 objed.el   | 8 ++++++--
 2 files changed, 10 insertions(+), 3 deletions(-)

diff --git a/README.asc b/README.asc
index 7d399f9..495d188 100644
--- a/README.asc
+++ b/README.asc
@@ -337,11 +337,14 @@ once you can mark them first (see the "Misc commands" 
below):
 |Evaluate current object in REPL (need `eval-in-repl` to be installed).
 
 |kbd:[M - RET]
-|Insert new (empty) instance of current object type. This inserts the current 
object without the inner content.
+|Duplicate object.
 
 |kbd:[S - RET]
 |Comment and duplicate object.
 
+|kbd:[C - M - RET]
+|Insert new (empty) instance of current object type. This inserts the current 
object without the inner content.
+
 |kbd:[$]
 |Spell check textual content of object using `flyspell`.
 
diff --git a/objed.el b/objed.el
index ce93591..608757d 100644
--- a/objed.el
+++ b/objed.el
@@ -738,8 +738,8 @@ selected one."
       (objed-define-op nil objed-indent ignore))
     (define-key map ";"
       (objed-define-op nil objed-comment-or-uncomment-region))
-    (define-key map (kbd "<S-return>")
-      (objed-define-op nil objed-comment-duplicate))
+
+
 
     (define-key map "$"
       (objed-define-op nil flyspell-region))
@@ -782,7 +782,11 @@ selected one."
     (define-key map (kbd "<C-return>")
       (objed-define-op
        nil objed-run-or-eval ignore))
+    (define-key map (kbd "<S-return>")
+      (objed-define-op nil objed-comment-duplicate))
     (define-key map (kbd "<M-return>")
+      (objed-define-op nil objed-duplicate-down))
+    (define-key map (kbd "<C-M-return>")
       'objed-insert-new-object)
     (define-key map "^" 'objed-raise)
     (define-key map "!" 'objed-execute)