21294: fix incorrectly capitalized completion descriptions

4 files changed, 34 insertions, 34 deletions

diff --git a/Completion/Unix/Command/_ccal b/Completion/Unix/Command/_ccal
index ce5a62e59..63eb6699f 100644
--- a/Completion/Unix/Command/_ccal
+++ b/Completion/Unix/Command/_ccal
@@ -1,17 +1,17 @@
 #compdef ccal
 
 _arguments \
-        '-nodata[Ignore appointment descriptions file]' \
-        '-data-file=[Load appointments from file]:caldat file:_files' \
-        '-future[Show only future appointments on current month]' \
-        '-today[Show only today'"'"'s appointments on current month]' \
+        '-nodata[ignore appointment descriptions file]' \
+        '-data-file=[load appointments from file]:caldat file:_files' \
+        '-future[show only future appointments on current month]' \
+        '-today[show only today'"'"'s appointments on current month]' \
         '-europe[European format (first day is Monday)]' \
         '-american[North American format (first day is Sunday)]' \
-        '-maxappts=[Display maximum of n appointments]:number of appointments:('{8..50}')' \
-        '-pause[Pause for keystroke before exiting]' \
-        '-nocolor[Inhibit use of colors]' \
-        '-color-file=[Load color definitions from file]:calcol file:_files' \
-        '-8bit[Display 8-bit ascii characters]' \
+        '-maxappts=[display maximum of n appointments]:number of appointments:('{8..50}')' \
+        '-pause[pause for keystroke before exiting]' \
+        '-nocolor[inhibit use of colors]' \
+        '-color-file=[load color definitions from file]:calcol file:_files' \
+        '-8bit[display 8-bit ascii characters]' \
         '1:month:(1 2 3 4 5 6 7 8 9 10 11 12 jan feb mar apr may jun jul aug sep oct nov dec)' \
         '2:year:'
 
diff --git a/Completion/Unix/Command/_perl b/Completion/Unix/Command/_perl
index 9d07b562d..05b386d11 100644
--- a/Completion/Unix/Command/_perl
+++ b/Completion/Unix/Command/_perl
@@ -18,7 +18,7 @@ _perl () {
     '-i-[edit <> files in place (make backup if extension supplied)]:backup file extension: ' \
     '*-I-[specify @INC/#include directory (may be used more than once)]:include path:_files -/' \
     '-l-[enable line ending processing, specifies line terminator]:output record separator in octal: ' \
-    \*{-m,-M}"-[module.. executes \`use/no module...' before executing your script.]:module:_perl_m_opt" \
+    \*{-m,-M}"-[module.. executes \`use/no module...' before executing your script]:module:_perl_m_opt" \
     "-n[assume 'while (<>) { ... }' loop around your script]" \
     "-p[assume loop like -n but print line also like sed]" \
     "-P[run script through C preprocessor before compilation]" \
@@ -29,7 +29,7 @@ _perl () {
     "-U[allow unsafe operations]" \
     "-v[print version number, patchlevel plus VERY IMPORTANT perl info]" \
     "-V-[print perl configuration information]:configuration keys:_perl_config_vars" \
-    '-w[TURN WARNINGS ON FOR COMPILATION OF YOUR SCRIPT. Recommended.]' \
+    '-w[turn warnings on for compilation of your script. Recommended]' \
     '-x-[strip off text before #!perl line and perhaps cd to directory]:directory to cd to:_files -/' \
     '1:Perl script:_files -/ -g "*.(p[ml]|PL)(-.)"' \
     '*::args: _normal' 
diff --git a/Completion/Unix/Command/_surfraw b/Completion/Unix/Command/_surfraw
index ebb739a8d..326504794 100644
--- a/Completion/Unix/Command/_surfraw
+++ b/Completion/Unix/Command/_surfraw
@@ -5,11 +5,11 @@ _arguments \
    '-elvi[list Surfraw mechanisms for conquering evil]' \
    '-escape-url-args=[apply url escaping to arguments]:bool:(yes no)' \
    '(-g -graphical)'{-g,-graphical}'[get some windowed sin]' \
-   '-p0rn=[Yes, yes, harder, deeper, faster, oh baybe]:bool:(yes no)' \
+   '-p0rn=[yes, yes, harder, deeper, faster, oh baybe]:bool:(yes no)' \
    '-help' \
    '-quiet:bool:(yes no)' \
    '-new[start in a new window]' \
    '(-t -text)'{-t,-text}'[back to the yellow brick road]' \
-   '(-q -quote)'{-q,-quote}'[Quote arguments with quote characters]' \
+   '(-q -quote)'{-q,-quote}'[quote arguments with quote characters]' \
    '-version[display Surfraw version]' \
    ':elvi: compadd ${${(f)"$(surfraw -elvi)"}%%[[:space:]]##--*}'
diff --git a/Completion/Unix/Command/_vux b/Completion/Unix/Command/_vux
index badd9523d..1ed56dca6 100644
--- a/Completion/Unix/Command/_vux
+++ b/Completion/Unix/Command/_vux
@@ -21,17 +21,17 @@ case "$service" in
       '-e:pattern' \
       '-O:device:_files' \
       '-M:minimum age val' \
-      '-S[Disable saving scorelist]' \
-      '-A[Disable saving agelist]' \
-      '-Z[Disable saving countlist]' \
-      '-Y[Disable missing log]' \
-      '-c[Disable rating check]' \
-      '-d[Disable rating updates on play]' \
-      '-l[Disable rating updates on skip]' \
-      '-j[Disable repeat check]' \
-      '-b[Disable repeat updates on play]' \
-      '-k[Disable repeat updates on skip]' \
-      '-n[Disable player]' \
+      '-S[disable saving scorelist]' \
+      '-A[disable saving agelist]' \
+      '-Z[disable saving countlist]' \
+      '-Y[disable missing log]' \
+      '-c[disable rating check]' \
+      '-d[disable rating updates on play]' \
+      '-l[disable rating updates on skip]' \
+      '-j[disable repeat check]' \
+      '-b[disable repeat updates on play]' \
+      '-k[disable repeat updates on skip]' \
+      '-n[disable player]' \
       '-t:percent' \
       '-T:percent' \
       '-C:factor' \
@@ -41,17 +41,17 @@ case "$service" in
       '-X:score' \
       '-N:count' \
       '-f:rating' \
-      '-J[Accelerate decreases]' \
-      '-K[Accelerate increases]' \
-      '-u[Check age before rating]' \
-      '-R[Show ratings after processing]' \
-      '-V[Verbose file manipulation]' \
-      '-v[Show version and exit]' \
-      '-F[Skip songs with -n and -xf]' \
-      '-q[Minimize vux output]' \
-      '-P[Always play new songs]' \
+      '-J[accelerate decreases]' \
+      '-K[accelerate increases]' \
+      '-u[check age before rating]' \
+      '-R[show ratings after processing]' \
+      '-V[verbose file manipulation]' \
+      '-v[show version and exit]' \
+      '-F[skip songs with -n and -xf]' \
+      '-q[minimize vux output]' \
+      '-P[always play new songs]' \
       '-g[print stats in xgraph format]' \
-      '-h[Show summary of options]'
+      '-h[show summary of options]'
   ;;
 
   (vuxctl)