Репозитории ALT
S: | 4.17-alt8 |
5.1: | 4.06-alt1 |
4.1: | 3.02-alt2.1.0 |
4.0: | 3.02-alt2.1.0 |
Группа :: Разработка/Perl
Пакет: perl-WWW-Curl
Главная Изменения Спек Патчи Sources Загрузить Gear Bugs and FR Repocop
Патч: WWW-Curl-4.17-alt-no-win32.patch
Скачать
Скачать
--- WWW-Curl-4.17/Makefile.PL 2014-02-21 18:08:09.000000000 +0200
+++ WWW-Curl-4.17/Makefile.PL 2020-04-04 16:35:57.181739881 +0300
@@ -121,6 +121,7 @@
open (H, "<", $curl_h) or die ("Cannot open $curl_h: ".$!);
while(<H>) {
if (/^#define (CURL[A-Za-z0-9_]*)/) {
+ next if /CURL_WIN32/;
push @syms, $1;
}
}
@@ -189,7 +189,7 @@
my $remainder = substr($option, length($group), length($option));
my $initial = substr($remainder, 0, 1);
if ($next_initial eq $initial) {
-
+ next if $remainder eq 'CURLOPT';
print CURL_XS
" if (strEQ(name, \"$remainder\")) return "."$groupref->{$option};\n";