[Po4a-commits] "po4a po4a,1.51,1.52"

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a
In directory haydn:/tmp/cvs-serv14077

Modified Files:
	po4a 
Log Message:
use File::Copy instead of system("cp").


Index: po4a
===================================================================
RCS file: /cvsroot/po4a/po4a/po4a,v
retrieving revision 1.51
retrieving revision 1.52
diff -u -d -r1.51 -r1.52
--- po4a	26 Feb 2006 20:14:08 -0000	1.51
+++ po4a	26 Feb 2006 20:19:44 -0000	1.52
@@ -289,6 +289,7 @@
 use Pod::Usage qw(pod2usage);
 
 use File::Temp;
+use File::Copy;
 
 Locale::Po4a::Common::textdomain('po4a');
 
@@ -740,7 +741,7 @@
     } else {
 	print wrap_msg(gettext("Creating %s:"), $po_filename{$lang})
 	    if $po4a_opts{"verbose"};
-	system ("cp",$pot_filename,$po_filename{$lang}) == 0
+	copy($pot_filename,$po_filename{$lang})
 	    or die wrap_msg(gettext("Error while copying the po file: %s"), $!);
     }
 }