[ LUGOS-PROG ] install patch?

[Borut Mrak]

On Wednesday 11 April 2001 09:46, you wrote:
> Index: lib/LWP/Simple.pm
> ===================================================================
> RCS file: /cvsroot/libwww-perl/lwp5/lib/LWP/Simple.pm,v
> retrieving revision 1.33
> diff -u -p -u -r1.33 Simple.pm
> --- lib/LWP/Simple.pm 2000/05/24 09:40:43 1.33
> +++ lib/LWP/Simple.pm 2001/04/10 17:12:27
> @@ -298,7 +298,7 @@ sub _trivial_http_get
> my $sock = IO::Socket::INET->new(PeerAddr => $host,
> PeerPort => $port,
> Proto => 'tcp',
> - Timeout => 60) || return;
> + Timeout => 60) || return undef;
> $sock->autoflush;
> my $netloc = $host;
> $netloc .= ":$port" if $port != 80;
[snip]
> ===
> TOREJ: kako instalirati ta patch?

naredis locate Simple.pm (ce nimas locate-a ti povem, da je LWP/Simple.pm 
nekje v  perl -e 'foreach (@INC) {print "$_\n"};' ), v njem poisces vrstico 

Timeout => 60) || return;

in jo popravis.

Ce pa imas kaksen vecji patch kot je tole, potem uporabis program patch in 
njegovo dokumentacijo (man patch)

lp,

-- 
Borut
borut.mrak at ijs.si
-----------------
Black holes really suck...