#662: Perl CGI samples are broken
------------------------------------------+---------------------------------
Reporter: [EMAIL PROTECTED] | Owner:
Type: Bug | Status: new
Priority: Normal | Milestone:
Component: Server : Perl | Version: SVN
Resolution: | Keywords: SF Confirmed HasPatch
------------------------------------------+---------------------------------
Changes (by w.olchawa):
* keywords: SF => SF Confirmed HasPatch
* version: => SVN
Comment:
Hi!
I've encountered a problem in the perl examples as well. The GetServerPath
function didn't find a correct server path and as a result I couldn't load
the editor. Changing $ENV{'PATH_INFO'} to $ENV{'REQUEST_URI'} solve the
problem. I'm not a perl expert but I think the function should be changed
according to you suggestions. So the GetServerPath function would be:
{{{
sub GetServerPath
{
my $dir;
if($DefServerPath) {
$dir = $DefServerPath;
} else {
if($ENV{'REQUEST_URI'}) {
$dir = $ENV{'REQUEST_URI'};
} elsif($ENV{'FILEPATH_INFO'}) {
$dir = $ENV{'FILEPATH_INFO'};
}
}
return($dir);
}
}}}
Thank you for investigating and enjoy working with FCKeditor.
Best regards.
--
Ticket URL: <http://dev.fckeditor.net/ticket/662#comment:3>
FCKeditor <http://www.fckeditor.net>
The text editor for Internet
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
FCKeditor-Trac mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/fckeditor-trac