diff options
author | Josip Rodin <joy> | 2001-09-05 09:06:07 +0000 |
---|---|---|
committer | Josip Rodin <joy> | 2001-09-05 09:06:07 +0000 |
commit | 45b03f6ff948aeeff1e9c92e1477592f415cf5e5 (patch) | |
tree | 76abeb07081cd4e4b6ac2b1ab7426288d15f84e8 /check_trans.pl | |
parent | c160f70f761f8c373de741baf3a843b2f46cff86 (diff) |
fixed numoldr and numrev variables
CVS version numbers
check_trans.pl: 1.38 -> 1.39
Diffstat (limited to 'check_trans.pl')
-rwxr-xr-x | check_trans.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/check_trans.pl b/check_trans.pl index 5a5965a712e..d65f371c7d9 100755 --- a/check_trans.pl +++ b/check_trans.pl @@ -452,8 +452,8 @@ sub check_file { my $str; my $status = 8; - my ($numrev) = ($revision =~ m/^1\.(\d+)$/) || "0"; - my ($numoldr) = ($oldr =~ m/^1\.(\d+)$/) || "0"; + (my $numrev) = $revision =~ m/^1\.(\d+)$/; $numrev ||= "0"; + (my $numoldr) = $oldr =~ m/^1\.(\d+)$/; $numoldr ||= "0"; if (!$oldr) { $oldr = '1.1'; $str = "Unknown status of $name (revision should be $revision)"; |