account for the # in anchor tags

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@3483 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
Robert Hak 2003-03-19 20:22:39 +00:00
parent 8025685146
commit 8c8a606601
2 changed files with 3 additions and 3 deletions

View file

@ -1,4 +1,4 @@
#!/usr/bin/perl #!/usr/local/bin/perl
# this is really a faq2html and should only be used for this purpose # this is really a faq2html and should only be used for this purpose
@ -6,7 +6,7 @@ sub fixline {
$_ =~ s/\</&lt;/g; $_ =~ s/\</&lt;/g;
$_ =~ s/\>/&gt;/g; $_ =~ s/\>/&gt;/g;
$_ =~ s/(http:\/\/([a-zA-Z0-9_.\/-]*)[^\) .\n])/\<a href=\"$1\"\>$1\<\/a\>/g; $_ =~ s/(http:\/\/([a-zA-Z0-9_.\#\/-]*)[^\) .\n])/\<a href=\"$1\"\>$1\<\/a\>/g;
$_ =~ s/(\\|\/)$/$1&nbsp;/g; # clobber backslash on end of line $_ =~ s/(\\|\/)$/$1&nbsp;/g; # clobber backslash on end of line
} }

View file

@ -9,7 +9,7 @@ sub fixline {
$_ =~ s/\</&lt;/g; $_ =~ s/\</&lt;/g;
$_ =~ s/\>/&gt;/g; $_ =~ s/\>/&gt;/g;
$_ =~ s/(http:\/\/([a-zA-Z0-9_.\/-]*)[^\) .\n])/\<a href=\"$1\"\>$1\<\/a\>/g; $_ =~ s/(http:\/\/([a-zA-Z0-9_.\#\/-]*)[^\) .\n])/\<a href=\"$1\"\>$1\<\/a\>/g;
$_ =~ s/(\\|\/)$/$1&nbsp;/g; # clobber backslash on end of line $_ =~ s/(\\|\/)$/$1&nbsp;/g; # clobber backslash on end of line
} }