From edbd64a3d20740982c359787e6fb522b38df763d Mon Sep 17 00:00:00 2001 From: Moritz Lenz Date: Mon, 18 Oct 2010 12:38:25 +0200 Subject: [PATCH] don't die in absence of revision file --- build-scripts/rebuild-rakudo.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/build-scripts/rebuild-rakudo.pl b/build-scripts/rebuild-rakudo.pl index 218ca85..737abf9 100755 --- a/build-scripts/rebuild-rakudo.pl +++ b/build-scripts/rebuild-rakudo.pl @@ -22,7 +22,7 @@ system('git', 'pull'); my $revision_file = "$home$other/rakudo-revision"; -for ($revision_file) { +eval { open my $fh, '<', $revision_file or break; my $r = <$fh>; close $fh; @@ -34,7 +34,7 @@ say "Don't need to rebuild, we are on the newest revision anyway"; exit; } -} +}; my $revision = `cat build/PARROT_REVISION`; if ($revision =~ m/^(\d+)/) {