Add -L to add-(zsh|zle)-hook[-widget] completion

…and hide mutually exclusive options.

3 files changed, 16 insertions, 6 deletions

diff --git a/ChangeLog b/ChangeLog
index 7cf9ec4e5..079b92d32 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2021-04-19  Oliver Kiddle  <opk@zsh.org>
 
+	* Marlon Richert: 48621: Completion/Zsh/Function/_add-zsh-hook,
+	Completion/Zsh/Function/_add-zle-hook-widget: Add -L to
+	add-(zsh|zle)-hook[-widget] completion
+
 	* André Kugland: github/zsh-completions #792:
 	Completion/Unix/Command/_opustools: new opus-tools completion
 
diff --git a/Completion/Zsh/Function/_add-zle-hook-widget b/Completion/Zsh/Function/_add-zle-hook-widget
index f108d1868..c0bd77819 100644
--- a/Completion/Zsh/Function/_add-zle-hook-widget
+++ b/Completion/Zsh/Function/_add-zle-hook-widget
@@ -26,9 +26,12 @@ _add-zle-hook-widget() {
   local context state state_descr line
   typeset -A opt_args
   _arguments -s -w -S : \
-    '(-D)-d[remove HOOK from the array]' \
-    '(-d)-D[interpret HOOK as pattern to remove from the array]' \
-    {-U,-z,-k}"[passed to 'autoload']" \
+    "(-d -D -U -z -k)-L[output in form of 'zstyle' commands]" \
+    '(-L -D -U -z -k)-d[remove HOOK from the array]' \
+    '(-L -d -U -z -k)-D[interpret HOOK as pattern to remove from the array]' \
+    '(-L -d -D)-U[suppress alias expansion for functions]' \
+    '(-L -d -D -k)-z[mark function for zsh-style autoloading]' \
+    '(-L -d -D -z)-k[mark function for ksh-style autoloading]' \
     ':hook type:_add-zle-hook-widget_types' \
     ':widget:_add-zle-hook-widget_widgets'
 }
diff --git a/Completion/Zsh/Function/_add-zsh-hook b/Completion/Zsh/Function/_add-zsh-hook
index e8ae97052..4d8a96dab 100644
--- a/Completion/Zsh/Function/_add-zsh-hook
+++ b/Completion/Zsh/Function/_add-zsh-hook
@@ -14,9 +14,12 @@ _add-zsh-hook() {
   local context state state_descr line
   typeset -A opt_args
   _arguments -s -w -S : \
-    '(-D)-d[remove HOOK from the array]' \
-    '(-d)-D[interpret HOOK as pattern to remove from the array]' \
-    {-U,-z,-k}"[passed to 'autoload']" \
+    "(-d -D -U -z -k)-L[output in form of 'typeset' commands]" \
+    '(-L -D -U -z -k)-d[remove HOOK from the array]' \
+    '(-L -d -U -z -k)-D[interpret HOOK as pattern to remove from the array]' \
+    '(-L -d -D)-U[suppress alias expansion for functions]' \
+    '(-L -d -D -k)-z[mark function for zsh-style autoloading]' \
+    '(-L -d -D -z)-k[mark function for ksh-style autoloading]' \
     ':hook class:(chpwd precmd preexec periodic zshaddhistory zshexit zsh_directory_name)' \
     ':hook function:_add-zsh-hook_hooks'
 }