From 65345f9e5036da80e2acd2941a9703526c9d44ad Mon Sep 17 00:00:00 2001
From: Tanaka Akira <akr@users.sourceforge.net>
Date: Fri, 26 Nov 1999 08:56:49 +0000
Subject: zsh-workers/8787

---
 Completion/Core/_correct | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'Completion/Core/_correct')

diff --git a/Completion/Core/_correct b/Completion/Core/_correct
index c958bdb83..35114ed22 100644
--- a/Completion/Core/_correct
+++ b/Completion/Core/_correct
@@ -8,7 +8,9 @@
 # Supported configuration keys are the same as for `_approximate', only
 # starting with `correct'.
 
-local ret=1 opm="$compstate[pattern_match]" curcontext="${curcontext}:correct"
+local ret=1 opm="$compstate[pattern_match]" curcontext="${curcontext}"
+
+[[ "$curcontext" != :correct* ]] && curcontext="${curcontext}:correct"
 
 compstate[pattern_match]='-'
 
-- 
cgit 1.4.1