summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--NEWS1
-rw-r--r--src/global_checks.ml3
2 files changed, 3 insertions, 1 deletions
diff --git a/NEWS b/NEWS
index d3e16c3..4b9c41c 100644
--- a/NEWS
+++ b/NEWS
@@ -4,6 +4,7 @@
- perl_checker:
o recognize \B in regexps
o recognize -p (pipe test) & -S (socket test)
+ o recognize getpgrp()
o kill "undeclared variable $^S"
Version 1.2.17 - 19 March 2012, by Thierry Vignaud
diff --git a/src/global_checks.ml b/src/global_checks.ml
index af651b0..b12284c 100644
--- a/src/global_checks.ml
+++ b/src/global_checks.ml
@@ -189,7 +189,8 @@ let is_global_var context ident =
| "defined" | "delete" | "die"
| "each" | "endpwent" | "eof" | "eval" | "exec" | "exists" | "exit"
| "fcntl" | "fileno" | "flock" | "formline" | "fork"
- | "gethostbyaddr" | "gethostbyname" | "getgrent" | "getgrnam" | "getgrgid" | "getppid" | "getpwent" | "getpwnam" | "getpwuid" | "getservbyname" | "glob" | "gmtime" | "goto" | "grep" | "hex"
+ | "gethostbyaddr" | "gethostbyname" | "getgrent" | "getgrnam" | "getgrgid"
+ | "getpgrp" | "getppid" | "getpwent" | "getpwnam" | "getpwuid" | "getservbyname" | "glob" | "gmtime" | "goto" | "grep" | "hex"
| "index" | "int" | "ioctl" | "join" | "keys" | "kill"
| "last" | "lc" | "lcfirst" | "length" | "link" | "localtime" | "log" | "lstat"
| "map" | "mkdir" | "next" | "no" | "oct" | "open" | "opendir" | "ord"