diff options
| author | Vladimir Glazounov <vg@openoffice.org> | 2005-03-10 10:27:32 +0000 |
|---|---|---|
| committer | Vladimir Glazounov <vg@openoffice.org> | 2005-03-10 10:27:32 +0000 |
| commit | a926c6b9943978af0630c2ab4f506a5c825feb11 (patch) | |
| tree | 4159b59f3b1f3b0214743792e8a7d61b87b5b473 /transex3 | |
| parent | 637f386449594cb38e99a8d0847338db66682104 (diff) | |
INTEGRATION: CWS pj22 (1.8.10); FILE MERGED
2005/03/06 15:14:34 pjanik 1.8.10.1: #i43437#: Remove temporary file in all cases.
Diffstat (limited to 'transex3')
| -rwxr-xr-x | transex3/scripts/localize.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/transex3/scripts/localize.pl b/transex3/scripts/localize.pl index 041e038ee1d4..db7d56dfce4d 100755 --- a/transex3/scripts/localize.pl +++ b/transex3/scripts/localize.pl @@ -6,9 +6,9 @@ eval 'exec perl -wS $0 ${1+"$@"}' # # $RCSfile: localize.pl,v $ # -# $Revision: 1.8 $ +# $Revision: 1.9 $ # -# last change: $Author: obo $ $Date: 2005-01-27 15:58:33 $ +# last change: $Author: vg $ $Date: 2005-03-10 11:27:32 $ # # The Contents of this file are made available subject to the terms of # either of the following licenses @@ -287,13 +287,13 @@ sub writesdf{ close DESTFILE; if( move( $localizeFile , $localizeFile.".backup" ) ){ if( copy( $tmpfile , $localizeFile ) ){ - unlink $tmpfile; unlink $localizeFile.".backup"; } else { print STDERR "Can't open/create '$localizeFile', original file is renamed to $localizeFile.backup\n"; } } else { print STDERR "Can't open/create '$localizeFile'\n"; } }else{ print STDERR "WARNING: Can't open/create '$localizeFile'\n"; } + unlink $tmpfile; } } if( $no_sort eq '' ){ |