Robert Fox <[EMAIL PROTECTED]> writes:

> I keep getting curl errors when trying to use urpmi - but wget seems to
> work OK.
> 
> libcurl2-7.10.5-1mdk
> curl-7.10.5-1mdk
> urpmi-4.4-9mdk
> gurpmi-4.4-9mdk

Really, I checked here and it works nicely with the above version...

Do you use proxy ? maybe it is the problem ? Try running with -v urpmi to check,
you may need to modify /usr/lib/perl5/vendor_perl/5.8.0/urpm.pm and apply the
following patch in order to check what curl is getting :

--- /usr/lib/perl5/vendor_perl/5.8.0/urpm.pm	2003-07-17 14:09:34.000000000 +0200
+++ /tmp/urpm.pm	2003-07-18 15:56:34.000000000 +0200
@@ -262,6 +262,13 @@
     if (my @all_files = ((map { ("-O", $_) } @ftp_files), (map { /\/([^\/]*)$/ ? ("-z", $1, "-O", $_) : @{[]} } @other_files))) {
 	my @l = (@ftp_files, @other_files);
 	my ($buf, $file) = ('', undef);
+	print STDERR join("\n", map { "'$_'" } "/usr/bin/curl",
+			(ref($options) && $options->{limit_rate} ? ("--limit-rate", $options->{limit_rate}) : ()),
+			(ref($options) && $options->{proxy} ? set_proxy({ type => "curl", proxy => $options->{proxy} }) : ()),
+			(ref($options) && $options->{quiet} && !$options->{verbose} ? "-s" : @{[]}),
+			"-k", `curl -h` =~ /location-trusted/ ? "--location-trusted" : @{[]},
+                        "-R", "-f", "--stderr", "-",
+			@all_files) . " |";
 	open CURL, join(" ", map { "'$_'" } "/usr/bin/curl",
 			(ref($options) && $options->{limit_rate} ? ("--limit-rate", $options->{limit_rate}) : ()),
 			(ref($options) && $options->{proxy} ? set_proxy({ type => "curl", proxy => $options->{proxy} }) : ()),
Fran�ois.

Reply via email to