From 556b0fb83797b4260781fbfa1c6ae6e92675056d Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Fri, 9 Sep 2016 06:30:30 +0000
Subject: [PATCH] * Fix bug #30484
git-svn-id: trunk@34470 -
---
packages/fcl-web/src/base/httpdefs.pp | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/packages/fcl-web/src/base/httpdefs.pp b/packages/fcl-web/src/base/httpdefs.pp
index 0fc92ff5af..a1fb250d5c 100644
--- a/packages/fcl-web/src/base/httpdefs.pp
+++ b/packages/fcl-web/src/base/httpdefs.pp
@@ -383,7 +383,7 @@ type
Property ProtocolVersion : String Index ord(hvHTTPVErsion) Read GetHTTPVariable Write SetHTTPVariable;
// Specials, mostly from CGI protocol/Apache.
Property PathInfo : String index Ord(hvPathInfo) read GetHTTPVariable Write SetHTTPVariable;
- Property PathTranslated : String index Ord(hvPathInfo) read GetHTTPVariable Write SetHTTPVariable;
+ Property PathTranslated : String index Ord(hvPathTranslated) read GetHTTPVariable Write SetHTTPVariable;
Property RemoteAddress : String Index Ord(hvRemoteAddress) read GetHTTPVariable Write SetHTTPVariable;
Property RemoteAddr : String Index Ord(hvRemoteAddress) read GetHTTPVariable Write SetHTTPVariable; // Alias, Delphi-compat
Property RemoteHost : String Index Ord(hvRemoteHost) read GetHTTPVariable Write SetHTTPVariable;