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

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

[elpa] externals/objed c9b7c2a 05/21: Fix var not defined for edit-indir


From: Clemens Radermacher
Subject: [elpa] externals/objed c9b7c2a 05/21: Fix var not defined for edit-indirect
Date: Sun, 17 Mar 2019 15:00:16 -0400 (EDT)

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

    Fix var not defined for edit-indirect
---
 objed.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/objed.el b/objed.el
index 8a3ef54..2f6d396 100644
--- a/objed.el
+++ b/objed.el
@@ -865,6 +865,8 @@ Other single character keys are bound to `objed-undefined'."
     (define-key map "b" 'switch-to-buffer)
     (define-key map "o" 'objed-other-window)
     (define-key map "k" 'objed-kill-buffer)
+
+    (define-key map "0" 'delete-window)
     (define-key map "1" 'delete-other-windows)
     (define-key map "2" 'split-window-vertically)
     (define-key map "3" 'split-window-horizontally)
@@ -2583,9 +2585,8 @@ Swaps the current object with the previous one."
   (interactive)
   (objed--switch-and-move 'line 'forward))
 
-(defvar edit-indirect--overlay)
-
 
+(defvar edit-indirect--overlay)
 (defun objed-narrow (&optional arg)
   "Narrow to object.
 
@@ -2594,7 +2595,7 @@ With prefix argument ARG call `edit-indirect-region' if
   (interactive "P")
   (if objed--marked-ovs
       (message "Narrowing not possible with multiple objects.")
-    (cond (edit-indirect--overlay
+    (cond ((bound-and-true-p edit-indirect--overlay)
            (edit-indirect-commit))
           ((buffer-narrowed-p)
            (widen))



reply via email to

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