[csw-devel] SF.net SVN: gar:[19625] csw/mgar/pkg/cpan/makemake

[igalic at users.sourceforge.net]

Revision: 19625
          http://gar.svn.sourceforge.net/gar/?rev=19625&view=rev
Author:   igalic
Date:     2012-11-10 21:23:45 +0000 (Sat, 10 Nov 2012)
Log Message:
-----------
cpan/makemake: Update Forkmanager tmpdir handling

Modified Paths:
--------------
    csw/mgar/pkg/cpan/makemake

Modified: csw/mgar/pkg/cpan/makemake
===================================================================
--- csw/mgar/pkg/cpan/makemake	2012-11-10 21:20:58 UTC (rev 19624)
+++ csw/mgar/pkg/cpan/makemake	2012-11-10 21:23:45 UTC (rev 19625)
@@ -27,6 +27,7 @@
 use Data::Dumper;
 use LWP::UserAgent; # For online retreival of catalogname for package
 use Parallel::ForkManager;
+use File::Temp qw/ tempdir /;
 use JSON;
 
 # These three routines are used to capture the output of sub processes and
@@ -411,8 +412,8 @@
 	$modpath =~ s,::,/,g;
 	$modpath .= '.pm';
 
-	mkdir '/tmp/makemake';
-	my $pm = new Parallel::ForkManager( 15, "/tmp/makemake" );
+	my $tmpdir = tempdir( CLEANUP => 1 );
+	my $pm = new Parallel::ForkManager( 15, $tmpdir );
 
 	$pm -> run_on_finish ( # called BEFORE the first call to start()
 		sub {

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.