--- libaitcli/src/aitcli.c	2025/12/24 00:38:48	1.21.2.6
+++ libaitcli/src/aitcli.c	2025/12/24 00:49:52	1.21.2.7
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@openbsd-bg.org>
 *
 * $Author: misho $
-* $Id: aitcli.c,v 1.21.2.6 2025/12/24 00:38:48 misho Exp $
+* $Id: aitcli.c,v 1.21.2.7 2025/12/24 00:49:52 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -597,16 +597,18 @@ bufDEL(int idx, void * __restrict cli_buffer)
 	if (!cli_buffer || idx < 0 || idx > MAX_BINDKEY)
 		return RETCODE_ERR;
 
-	clrscrEOL(buf);
+	if (buf->line_bol < buf->line_eol && buf->line_eol < buf->line_len) {
+		clrscrEOL(buf);
 
-	buf->line_len--;
-	memmove(buf->line_buf + buf->line_eol - buf->line_bol, 
-			buf->line_buf + buf->line_eol - buf->line_bol + 1, 
-			buf->line_len - buf->line_eol);
-	buf->line_buf[buf->line_len - 1] = 0;
+		buf->line_len--;
+		memmove(buf->line_buf + buf->line_eol - buf->line_bol, 
+				buf->line_buf + buf->line_eol - buf->line_bol + 1, 
+				buf->line_len - buf->line_eol);
+		buf->line_buf[buf->line_len - 1] = 0;
 
-	printfEOL(buf, buf->line_len - 1, 1);
-	printfEOL(buf, -1, 1);
+		printfEOL(buf, buf->line_len - 1, 1);
+		printfEOL(buf, -1, 1);
+	}
 
 	return RETCODE_OK;
 }