Skip to content
Snippets Groups Projects
Commit d31070ae authored by endico%mozilla.org's avatar endico%mozilla.org
Browse files

A 4AcK to get this working with gtk+. Normally plus signs in urls are used to...

A 4AcK to get this working with gtk+. Normally plus signs in urls are used to represent spaces. Here we need to actaully use plus signs so i'm disabling the plus->space conversion.  Hopefully this doesn't break anything.
parent 5d1454fa
No related branches found
No related tags found
No related merge requests found
# $Id: Common.pm,v 1.16 1999/03/10 22:58:54 endico%mozilla.org Exp $
# $Id: Common.pm,v 1.17 1999/04/23 19:55:04 endico%mozilla.org Exp $
package LXR::Common;
......@@ -84,8 +84,12 @@ sub urlargs {
sub fileref {
my ($desc, $path, $line, @args) = @_;
#$path =~ s/\+/ /;
# jwz: URL-quote any special characters.
$path =~ s|([^-a-zA-Z0-9.\@/_\r\n])|sprintf("%%%02X", ord($1))|ge;
# endico: except plus. plus signs are normally used to represent spaces
# but here we need to allow plus signs in file names for gtk+
# hopefully this doesn't break anything else
$path =~ s|([^-a-zA-Z0-9.+\@/_\r\n])|sprintf("%%%02X", ord($1))|ge;
return("<a href=\"$Conf->{virtroot}/source$path".
&urlargs(@args).
......@@ -117,7 +121,10 @@ sub idref {
sub http_wash {
my $t = shift;
$t =~ s/\+/ /g;
# $t =~ s/\+/%2B/g;
#endico: don't use plus signs to represent spaces as is the normal
#case. we need to use them in file names for gtk+
$t =~ s/\%([\da-f][\da-f])/pack("C", hex($1))/gie;
# Paranoia check. Regexp-searches in Glimpse won't work.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment