--- doc/help/render.texxml.pl	2005/05/05 18:59:07	1.19
+++ doc/help/render.texxml.pl	2018/11/01 03:31:21	1.20
@@ -27,7 +27,7 @@
 
 use strict;
 use Fcntl;
-use POSIX qw(tmpnam);
+use File::Temp;
 
 if ( scalar(@ARGV) < 2 )
 {
@@ -57,7 +57,7 @@ USAGE
     exit();
 }
 
-my $tmpdir = tmpnam();
+my $tmpdir = File::Temp::tempdir();
 my $fileroot = $ARGV[1];
 
 if (substr($fileroot, -7) eq ".texxml")