[elpa] externals/objed aa8ba7b 093/216: Change DEL to behave as normal for char object

[Stefan Monnier]

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

    Change DEL to behave as normal for char object
---
 objed.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/objed.el b/objed.el
index a728fe3..0d3d928 100644
--- a/objed.el
+++ b/objed.el
@@ -2053,7 +2053,11 @@ append it to the `kill-ring'."
 (defun objed-del-insert ()
   "Delete current object and exit to insert state."
   (interactive)
-  (delete-region (objed--beg) (objed--end))
+  ;; keep usual behaviour so there
+  ;; is no confusion
+  (if (eq objed--object 'char)
+      (delete-char -1)
+    (delete-region (objed--beg) (objed--end)))
   (objed--exit-objed))
 
 (defvar objed--electric-event nil