summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-03-25 19:46:02 +0000
committerThierry Vignaud <tv@mageia.org>2012-03-25 19:46:02 +0000
commitddd599c3a0686636e507cb0d17fd2fdb45d9ec66 (patch)
tree99cc84716620d188b97719a723ceec6189831b23 /src
parent245878056890b930bc05f7ebcdfbf03e8c963b89 (diff)
downloadperl_checker-ddd599c3a0686636e507cb0d17fd2fdb45d9ec66.tar
perl_checker-ddd599c3a0686636e507cb0d17fd2fdb45d9ec66.tar.gz
perl_checker-ddd599c3a0686636e507cb0d17fd2fdb45d9ec66.tar.bz2
perl_checker-ddd599c3a0686636e507cb0d17fd2fdb45d9ec66.tar.xz
perl_checker-ddd599c3a0686636e507cb0d17fd2fdb45d9ec66.zip
recognize -p (pipe test) & -S (socket test) such as in MDK::Common::File
Diffstat (limited to 'src')
-rw-r--r--src/global_checks.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/global_checks.ml b/src/global_checks.ml
index ceed828..af651b0 100644
--- a/src/global_checks.ml
+++ b/src/global_checks.ml
@@ -183,7 +183,7 @@ let is_global_var context ident =
| _ -> false)
| I_func ->
(match ident with
- | "-b" | "-c" | "-d" | "-e" | "-f" | "-l" | "-o" | "-r" | "-s" | "-w" | "-x" | "-z" | "-t"
+ | "-b" | "-c" | "-d" | "-e" | "-f" | "-l" | "-o" | "-p" | "-r" | "-S" | "-s" | "-w" | "-x" | "-z" | "-t"
| "abs" | "alarm" | "atan2" | "bless"
| "caller" | "chdir" | "chmod" | "chomp" | "chop" | "chown" | "chr" | "chroot" | "close" | "closedir" | "cos" | "crypt"
| "defined" | "delete" | "die"