ALT Linux repos
S: | 5.34.1-alt1 |
5.0: | 5.8.9-alt2 |
4.1: | 5.8.8-alt19.M41.1 |
4.0: | 5.8.8-alt14 |
+updates: | 5.8.8-alt14 |
3.0: | 5.8.7-alt2 |
Group :: Development/Perl
RPM: perl
Main Changelog Spec Patches Sources Download Gear Bugs and FR Repocop
Patch: perl-5.24.3-alt-solovyov.patch
Download
Download
Oleg Solovyov
Приветствую.
Вчера наткнулся на сломанный пакет perl-Debug-Client и обнаружил, что тесты заваливаются, потому что perl не может определить терминал и соответственно ругается на stderr, портя результат теста.
Оказалось, что unix-терминал определяется исключительно по существованию /dev/tty, которого нет в хэшере, а ($^O eq 'linux') нигде не проверяется.
diff --git a/lib/perl5db.pl b/lib/perl5db.pl
index 6dae6b0..fbf73d1 100644
--- a/lib/perl5db.pl
+++ b/lib/perl5db.pl
@@ -1536,7 +1536,7 @@ We then determine what the console should be on various systems:
=cut
- elsif ( -e "/dev/tty" ) {
+ elsif ( -e "/dev/tty" or $^O eq 'linux' ) {
$console = "/dev/tty";
}