summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-09-04 14:13:19 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-09-04 14:13:19 +0000
commit5ab6f290a532899e16b4294b08a32d48bd08579e (patch)
tree69453c512134f1299c63ba9b161d8dc301624753
parent82454e64199c2451153c6d27a362bacec9e66ef7 (diff)
downloadperl_checker-5ab6f290a532899e16b4294b08a32d48bd08579e.tar
perl_checker-5ab6f290a532899e16b4294b08a32d48bd08579e.tar.gz
perl_checker-5ab6f290a532899e16b4294b08a32d48bd08579e.tar.bz2
perl_checker-5ab6f290a532899e16b4294b08a32d48bd08579e.tar.xz
perl_checker-5ab6f290a532899e16b4294b08a32d48bd08579e.zip
recognize file test "-o" (File is owned by effective uid.)
-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 c50bb31..8425ee3 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" | "-r" | "-s" | "-w" | "-x" | "-z" | "-t"
+ | "-b" | "-c" | "-d" | "-e" | "-f" | "-l" | "-o" | "-r" | "-s" | "-w" | "-x" | "-z" | "-t"
| "abs" | "alarm" | "atan2" | "bless"
| "caller" | "chdir" | "chmod" | "chomp" | "chop" | "chown" | "chr" | "chroot" | "close" | "closedir" | "cos" | "crypt"
| "defined" | "delete" | "die"