41965: complete new functions -W and zmodload -s options

3 files changed, 7 insertions, 1 deletions

diff --git a/ChangeLog b/ChangeLog
index cf97faa48..c5d2bc32d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2017-10-31  Oliver Kiddle  <opk@zsh.org>
 
+	* 41965: Completion/Zsh/Command/_typeset: complete functions -W
+
+	* 41965: Completion/Zsh/Command/_zmodload: complete zmodload -s
+
 	* 41963: Completion/Unix/Command/_gnutls: update for gnutls 3.6.1
 
 2017-10-30  Daniel Shahaf  <d.s@daniel.shahaf.name>
diff --git a/Completion/Zsh/Command/_typeset b/Completion/Zsh/Command/_typeset
index fb9e3ab5e..e4446a6ff 100644
--- a/Completion/Zsh/Command/_typeset
+++ b/Completion/Zsh/Command/_typeset
@@ -41,6 +41,7 @@ allargs=(
   uf '-u[mark function for autoloadling]'
   up '-u[convert the value to uppercase]'
   w '(-k -z)-w[specify that arguments refer to files compiled with zcompile]'
+  W '-+W[turn on WARN_NESTED_VAR for function]'
   x "($fopts)-+x[export parameter]"
   z "($popts -k -w)-+z[mark function for zsh-style autoloading]"
 )
@@ -54,7 +55,7 @@ case ${service} in
   ;;
   float) use="EFHghlprtux";;
   functions)
-    use="UkmTtuzM"
+    use="UkmTtuzMW"
     func=f
     allargs[M]='(-k -t -T -u -U -z -M +M +k +t +z)-+M[define mathematical function]'
   ;;
diff --git a/Completion/Zsh/Command/_zmodload b/Completion/Zsh/Command/_zmodload
index 57fb990e9..31163eb72 100644
--- a/Completion/Zsh/Command/_zmodload
+++ b/Completion/Zsh/Command/_zmodload
@@ -17,6 +17,7 @@ _arguments -n -C -S -s \
   '(-u -b -c -d -p -f -A -R -I)-F[handle features]' \
   '(-u -b -c -d -p -f -A -R -I)-m[treat feature arguments as patterns]' \
   '(-d -e)-i[suppress error if command would do nothing]' \
+  '(-d -e -L)-s[suppress error if module is not available]' \
   '(-b -c -d -p -f -F -P -m)-I[define infix condition names]' \
   '(-u -b -c -d -p -f -A -R)-l[list features]' \
   '(-e -u)-L[output in the form of calls to zmodload]' \