[elpa] externals/objed c846b15 141/216: Init only where C-n is bound to something other than next-line

[Stefan Monnier]

branch: externals/objed
commit c846b15ceb85dde13f4d755b8297e76d23def0af
Author: Clemera <address@hidden>
Commit: Clemera <address@hidden>

    Init only where C-n is bound to something other than next-line
---
 objed.el | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/objed.el b/objed.el
index 0aa8be5..b9dd943 100644
--- a/objed.el
+++ b/objed.el
@@ -558,6 +558,7 @@ cons of guessed object and its state."
       (define-key map (kbd (format "C-%c" n)) 'digit-argument))
     ;; common emacs keys
     (define-key map (kbd "C-g") 'objed-quit)
+    ;; TODO: switch with q, so quit window is qq?
     (define-key map "g" 'objed-quit)
     (define-key map (kbd "?") 'objed-show-top-level)
     ;; TODO: support repeated invokation
@@ -1049,11 +1050,8 @@ See `objed-cmd-alist'."
 
 (defun objed-init-p ()
   "Default for `objed-init-p-function'."
-  (memq (key-binding "n")
-        '(self-insert-command
-          outshine-self-insert-command
-          org-self-insert-command
-          undefined)))
+  (eq (key-binding (kbd "C-n"))
+      #'next-line))
 
 (defun objed--init (&optional sym)
   "Initialize `objed'.