From: short <>
Date: Thu, 2 Oct 2003 20:25:07 +0000 (+0000)
Subject: fix
X-Git-Url: http://git.jankratochvil.net/?p=MyWeb.git;a=commitdiff_plain;h=04827f7491b1728301be5317da58c1f16f095663;hp=c8dccbabbbd73dcf3b25bddf5e8557d7551dd6c4

fix
---

diff --git a/Web.pm b/Web.pm
index 202ecd9..2b632a7 100644
--- a/Web.pm
+++ b/Web.pm
@@ -319,7 +319,7 @@ sub remote_ip ()
 	# As 'Apache::ForwardedFor' takes the first of $ENV{"HTTP_X_FORWARDED_FOR"}
 	# while the contents is '127.0.0.1, 213.220.195.171' if client has its own proxy.
 	# We must take the last item ourselves.
-	my $r=$ENV{"HTTP_X_FORWARDED_FOR"} || $W->{"r"}->remote_host();
+	my $r=$ENV{"HTTP_X_FORWARDED_FOR"} || $W->{"r"}->get_remote_host();
 	$r=~s/^.*,\s*//;
 	return $r;
 }