1
0
mirror of https://git.FreeBSD.org/ports.git synced 2024-10-31 21:57:12 +00:00
freebsd-ports/www/webglimpse/files/patch-ag
1998-11-02 08:56:30 +00:00

15 lines
404 B
Plaintext

--- lib/URL.pl.bak Fri Jan 9 08:58:41 1998
+++ lib/URL.pl Mon Nov 2 11:49:57 1998
@@ -49,7 +49,10 @@
$host =~ tr/A-Z/a-z/;
$port = ($3 ne "" ? $3 : $ftp_port);
$path = $4;
- if ($userstring =~ /(.*):(.*)@/) {
+ if (!defined($userstring)) {
+ $userid = undef;
+ $passwd = undef;
+ } elsif ($userstring =~ /(.*):(.*)@/) {
$userid = $1;
$passwd = $2;
} else {