From 3622c3ea7d6d84dc5bd2c94ea95b739670ca1614 Mon Sep 17 00:00:00 2001
From: Tanaka Akira <akr@users.sourceforge.net>
Date: Wed, 1 Mar 2000 15:38:25 +0000
Subject: zsh-workers/9957

---
 Test/comptest | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Test/comptest')

diff --git a/Test/comptest b/Test/comptest
index 7ea665c26..e8f1ffef6 100644
--- a/Test/comptest
+++ b/Test/comptest
@@ -7,6 +7,7 @@ debug=
 dump=(-D)
 code=
 zsh=${ZSH:-zsh}
+termcap_ce="$(echotc ce)"
 
 while getopts Dd:c:z: opt; do
   case $opt in
@@ -91,7 +92,7 @@ for log in "$logs[@]"; do
     log="${log[$mend[1]+1,-1]}"
     if (( 0 <= $mbegin[2] )); then
       if [[ $match[2] != TC && $match[3] != \ # ]]; then
-	print -lr "$match[2]:{$match[3]}"
+	print -lr "$match[2]:{${match[3]%$termcap_ce}}"
       fi
     elif (( 0 <= $mbegin[4] )); then
       print -lr "DESCRIPTION:{$match[4]}"
-- 
cgit 1.4.1