From 26c8bdf32396e7e775188cb1e0d1d197c846a173 Mon Sep 17 00:00:00 2001 From: Adam Spiers Date: Wed, 26 Jul 2000 19:47:28 +0000 Subject: [PATCH] unposted: -e, -I, -m and -M parameters can be specified multiple times --- Completion/User/_perl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Completion/User/_perl b/Completion/User/_perl index f46ef0c7b..64163c3a1 100644 --- a/Completion/User/_perl +++ b/Completion/User/_perl @@ -12,13 +12,13 @@ _perl () { '-d[run scripts under debugger]' \ '-d\:-[run under control of a debugging/tracing module]:debugging/tracing module:_perl_modules' \ '-D-:set debugging flags (argument is a bit mask or flags): ' \ - "-e+:one line of script. Several -e's allowed. Omit [programfile]." \ + "*-e+:one line of script. Several -e's allowed. Omit [programfile]." \ "-F-:split() pattern for autosplit (-a). The //'s are optional.: " \ '-h[list help summary]' \ '-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 -/' \ + '*-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]" \