branch: externals/hiddenquote
commit 602391cfe4c329639518ced68baeae9d516a46c8
Author: Mauro Aranda <maurooara...@gmail.com>
Commit: Mauro Aranda <maurooara...@gmail.com>

    Avoid delete-char in hiddenquote-delete-backward-char
    
    * hiddenquote.el (hiddenquote-delete-backward-char): Use
    widget-value-set rather than relying in delete-char.
---
 hiddenquote.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/hiddenquote.el b/hiddenquote.el
index d2a905ed89..761b708158 100644
--- a/hiddenquote.el
+++ b/hiddenquote.el
@@ -1455,7 +1455,8 @@ Doesn't really delete the character, rather it changes it 
for an empty space."
   (widget-backward 1)
   (unless (eq (widget-type (widget-at)) 'hiddenquote-character)
     (widget-forward 1))
-  (delete-char 1))
+  (widget-value-set (widget-at) " ")
+  (widget-backward 1))
 
 (defun hiddenquote-transpose-chars ()
   "Interchange the characters around point, and move forward one character.

Reply via email to