Workaround to make it stop from bailing out when working in a

directory that wasn't yet committed to CVS, which is the case when
working on new pages and only committing them when they have proved to
work properly.

CVS version numbers

touch_translations.pl: 1.4 -> 1.5

1 files changed, 5 insertions, 2 deletions

diff --git a/touch_translations.pl b/touch_translations.pl
index cf82a7503b0..dd01ed99110 100755
--- a/touch_translations.pl
+++ b/touch_translations.pl
@@ -103,12 +103,15 @@ my ($path, $file) = ($1, $2);
 
 # Get the revision of the original file
 my $origrev;
-open FILE, "${path}/CVS/Entries" or die "${path}/CVS/Entries: $!";
-while (<FILE>) {
+if (open FILE, "${path}/CVS/Entries") {
+  while (<FILE>) {
     if (m,^/$file.wml/([^/]+)/,) {
         $origrev = $1;
         last;
     }
+  }
+} else {
+    $origrev = "1.0";
 }
 
 foreach $lang (@langs) {