From 0fc23d16fdba00d75aebe6a824ae117e3453127b Mon Sep 17 00:00:00 2001
From: Sven Wischnowsky <wischnow@users.sourceforge.net>
Date: Mon, 2 Apr 2001 11:06:18 +0000
Subject: moved from Completion/Core/_correct

---
 Completion/Base/Completer/_correct | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 Completion/Base/Completer/_correct

(limited to 'Completion/Base')

diff --git a/Completion/Base/Completer/_correct b/Completion/Base/Completer/_correct
new file mode 100644
index 000000000..c9c3d999c
--- /dev/null
+++ b/Completion/Base/Completer/_correct
@@ -0,0 +1,19 @@
+#autoload
+
+# This is mainly a wrapper around the more general `_approximate'.
+# By setting `compstate[pattern_match]' to something unequal to `*' and
+# then calling `_approximate', we get only corrections, not all strings
+# with the corrected prefix and something after it.
+#
+# Supported configuration keys are the same as for `_approximate', only
+# starting with `correct'.
+
+local ret=1 opm="$compstate[pattern_match]"
+
+compstate[pattern_match]='-'
+
+_approximate && ret=0
+
+compstate[pattern_match]="$opm"
+
+return ret
-- 
cgit v1.2.3