From 2bdcaa9a559fc635a08ac73ccd418eafc049d712 Mon Sep 17 00:00:00 2001
From: Tanaka Akira <akr@users.sourceforge.net>
Date: Thu, 23 Sep 1999 13:03:26 +0000
Subject: zsh-workers/8010

---
 Src/Zle/deltochar.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'Src')

diff --git a/Src/Zle/deltochar.c b/Src/Zle/deltochar.c
index f0df33f95..d6a579d5c 100644
--- a/Src/Zle/deltochar.c
+++ b/Src/Zle/deltochar.c
@@ -43,7 +43,8 @@ deltochar(char **args)
 	    while (dest != ll && line[dest] != c)
 		dest++;
 	    if (dest != ll) {
-		dest++;
+		if (n > 0)
+		    dest++;
 		if (!n) {
 		    forekill(dest - cs, 0);
 		    ok++;
@@ -59,7 +60,7 @@ deltochar(char **args)
 		dest--;
 	    if (line[dest] == c) {
 		if (!n) {
-		    backkill(cs - dest, 1);
+		    backkill(cs - dest - 1, 1);
 		    ok++;
 		}
 		if (dest)
-- 
cgit 1.4.1