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

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

[elpa] externals/objed 76779dc 197/216: Adjust activation condition agai


From: Stefan Monnier
Subject: [elpa] externals/objed 76779dc 197/216: Adjust activation condition again
Date: Tue, 8 Jan 2019 12:29:38 -0500 (EST)

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

    Adjust activation condition again
---
 objed.el | 15 ++++++++++-----
 1 file changed, 10 insertions(+), 5 deletions(-)

diff --git a/objed.el b/objed.el
index 07d3b57..8229d65 100644
--- a/objed.el
+++ b/objed.el
@@ -1074,8 +1074,8 @@ See `objed-cmd-alist'."
 
 (defun objed--until-end (pos)
   "Activate part from POS until end."
-  ;; workaround: end-of-buffer behaves weird opoint is wrong
-  ;; use the mark instead
+  ;; workaround: end-of-buffer behaves weird opoint is wrong use the
+  ;; mark instead
   (if (eq this-command #'end-of-buffer)
       (objed--change-to :beg (mark) :ibeg (mark))
     (objed--change-to :beg pos :ibeg pos)))
@@ -1084,9 +1084,14 @@ See `objed-cmd-alist'."
   "Default for `objed-init-p-function'."
   (and (eq (key-binding (kbd "C-n"))
            #'next-line)
-       ;; modes which have their own modal setup
-       (not (eq (key-binding "n")
-                #'next-line))))
+       ;; only for modes which do not
+       ;; their their own modal setup
+       (or (memq (key-binding "f")
+                 '(self-insert-command
+                   org-self-insert-command
+                   outshine-self-insert-command
+                   outline-self-insert-command
+                   undefined)))))
 
 (defun objed--init (&optional sym)
   "Initialize `objed'.



reply via email to

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