diff options
| author | Attila Molnar <attilamolnar@hush.com> | 2015-07-23 00:49:14 +0200 |
|---|---|---|
| committer | Attila Molnar <attilamolnar@hush.com> | 2015-07-23 00:49:14 +0200 |
| commit | f92b20b6f206b610213f10801e59dd6d8c68f06d (patch) | |
| tree | f831440697316e2fb8d01825bc66d3886c69b9d6 | |
| parent | 539abb9e93e9657c136759116379f7182c78ea8c (diff) | |
| parent | 79d1a436bb5c7ab40e43130495c455ffc8c682a2 (diff) | |
Merge pull request #1080 from bradfirj/fix-tmpnam-insp20
Replace deprecated tmpnam() call
| -rw-r--r-- | make/utilities.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/make/utilities.pm b/make/utilities.pm index ae16ce3dc..baba584ad 100644 --- a/make/utilities.pm +++ b/make/utilities.pm @@ -29,6 +29,7 @@ use warnings FATAL => qw(all); use Exporter 'import'; use POSIX; +use File::Temp; use Getopt::Long; use Fcntl; our @EXPORT = qw(make_rpath pkgconfig_get_include_dirs pkgconfig_get_lib_dirs pkgconfig_check_version translate_functions promptstring); @@ -404,7 +405,7 @@ sub translate_functions($$) my $tmpfile; do { - $tmpfile = tmpnam(); + $tmpfile = File::Temp::tmpnam(); } until sysopen(TF, $tmpfile, O_RDWR|O_CREAT|O_EXCL|O_NOFOLLOW, 0700); print "(Created and executed \e[1;32m$tmpfile\e[0m)\n"; print TF $1; |