--- /home/danilo/rad/prevod/cvs.gnome.org/intltool.bild/intltool-update	2004-09-12 09:47:00.000000000 +0200
+++ intltool-update	2004-09-12 20:13:25.000000000 +0200
@@ -597,7 +597,7 @@
 
     open INFILE, $POTFILES_in;
     unlink "POTFILES.in.temp";
-    open OUTFILE, ">POTFILES.in.temp";
+    open OUTFILE, ">POTFILES.in.temp" or die("Cannot open POTFILES.in.temp for writing");
 
     my $gettext_support_nonascii = 0;
 
@@ -751,7 +751,11 @@
 
 sub POFile_Update
 {
-    -f "$MODULE.pot" or die "$PROGRAM: $MODULE.pot does not exist.\n";
+    my $filetest;
+    $filetest = `test -f "$MODULE.pot"`;
+    if ($? ne 0) {
+        die "$PROGRAM: $MODULE.pot does not exist.\n";
+    }
 
     my ($lang, $outfile) = @_;
 
@@ -761,7 +765,7 @@
     $outfile = "$lang.po" if ($outfile eq "");
 
     # I think msgmerge won't overwrite old file if merge is not successful
-    system ("msgmerge", "-o", $outfile, $infile, "$MODULE.pot");
+    print `msgmerge -o $outfile $infile $MODULE.pot`;
 }
 
 sub Console_WriteError_NotExisting
