diff options
| author | Attila Molnar <attilamolnar@hush.com> | 2016-02-22 12:52:18 +0100 |
|---|---|---|
| committer | Attila Molnar <attilamolnar@hush.com> | 2016-02-22 12:52:18 +0100 |
| commit | 0b63ccd0b5cb26883d6becb196fb98e4f95d0397 (patch) | |
| tree | d9c660b46e106d76c5953579eca45e49c4486cbf /make/utilities.pm | |
| parent | 7b6bd133ca4472f6cb8058d5e34e3c8b2af7e99a (diff) | |
| parent | 1624ab03b86542a2cb02eda809303144974755f3 (diff) | |
Merge insp20
Diffstat (limited to 'make/utilities.pm')
| -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 565ac5fff..f2d645f33 100644 --- a/make/utilities.pm +++ b/make/utilities.pm @@ -32,6 +32,7 @@ use warnings FATAL => qw(all); use Exporter 'import'; use Fcntl; use File::Path; +use File::Temp; use Getopt::Long; use POSIX; @@ -345,7 +346,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; |