From 2d35fd6ab0228ce2b698d7778c4ae134d7408a67 Mon Sep 17 00:00:00 2001
From: Felix Rosencrantz <f_rosencrantz@users.sourceforge.net>
Date: Mon, 4 Feb 2002 06:25:35 +0000
Subject: Fixed some problems with _cvs and flags.  Fixed _perl to complete a
 script args with _normal.

---
 Completion/Unix/Command/_perl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Completion/Unix/Command/_perl')

diff --git a/Completion/Unix/Command/_perl b/Completion/Unix/Command/_perl
index d9554e431..29016e333 100644
--- a/Completion/Unix/Command/_perl
+++ b/Completion/Unix/Command/_perl
@@ -31,7 +31,8 @@ _perl () {
     "-V-[print perl configuration information]:configuration keys:_perl_config_vars" \
     '-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 -/' \
-    '*:Perl script:_files -/ -g \*.p\[ml\]'
+    '1:Perl script:_files -/ -g \*.p\[ml\]' \
+    '*::args: _normal' 
 }
 
 _perl_m_opt () {
-- 
cgit 1.4.1