|
Lines 920-927
sub is_old_patch_version()
Link Here
|
| 920 |
|
920 |
|
| 921 |
open ($Patch, "@GNUPATCH@ --version|") || die "Can't run patch: $!"; |
921 |
open ($Patch, "@GNUPATCH@ --version|") || die "Can't run patch: $!"; |
| 922 |
$ver_line = <$Patch>; |
922 |
$ver_line = <$Patch>; |
| 923 |
$ver_line =~ m/\s+(\d+)\.(\d+)\.(\d+)/ || die "Can't get patch version\n"; |
923 |
$ver_line =~ m/\s+(\d+)\.(\d+)\.(\d+)/ || |
| 924 |
if ($1 >= 2 && $2 >= 5 && $3 >= 9) { |
924 |
$ver_line =~ m/\s+(\d+)\.(\d+)/ || |
|
|
925 |
$ver_line =~ m/\s+(\d+)/ || |
| 926 |
die "Can't get patch version\n"; |
| 927 |
if ($1 > 2 || ($1 == 2 && ($2 > 5 || ($2 == 5 && $3 >= 9)))) { |
| 925 |
$is_old = 0; |
928 |
$is_old = 0; |
| 926 |
} |
929 |
} |
| 927 |
|
930 |
|
