[Po4a-commits] "po4a/lib/Locale/Po4a Po.pm,1.51,1.52"

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory haydn:/tmp/cvs-serv21188/lib/Locale/Po4a

Modified Files:
	Po.pm 
Log Message:
use File::Copy::move instead of rename.


Index: Po.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Po.pm,v
retrieving revision 1.51
retrieving revision 1.52
diff -u -d -r1.51 -r1.52
--- Po.pm	4 Dec 2005 20:25:52 -0000	1.51
+++ Po.pm	22 Feb 2006 18:10:50 -0000	1.52
@@ -80,6 +80,7 @@
 
 use Carp qw(croak);
 use File::Path; # mkdir before write
+use File::Copy; # move
 
 use Encode;
 
@@ -333,7 +334,7 @@
             my ($atime, $mtime) = (time,time);
             utime $atime, $mtime, $filename;
         } else {
-            rename $tmp_filename, $filename ||
+            move $tmp_filename, $filename ||
                 die wrap_msg(dgettext("po4a","Can't rename %s to %s."),
                              $tmp_filename, $filename);
         }