oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixed POD in 12 files reported by new test for invalid whitespace

Browse source
This commit is contained in:
Wouter van Oijen 2006-05-20 10:39:16 +00:00
parent e35760ce6a
commit e81ce2759a
12 changed files with 123 additions and 121 deletions
Download patch file Download diff file Expand all files Collapse all files

26
lib/WebGUI/HTML.pm
View file

@ -68,15 +68,15 @@ sub cleanSegment {
$html =~ s/\<meta.*?\>//ixsg;
# remove link tags
$html =~ s/\<link.*?\>//ixsg;
# remove title tags
# remove title tags
$html =~ s/\<title\>.*?\<\/title\>//ixsg;
# remove head tags
# remove head tags
$html =~ s/\<head.*?\>//ixsg;
$html =~ s/\<\/head>//ixsg;
# remove body tags
# remove body tags
$html =~ s/\<body.*?\>//ixsg;
$html =~ s/\<\/body>//ixsg;
# remove html tags
# remove html tags
$html =~ s/\<html>//ixsg;
$html =~ s/\<\/html>//ixsg;
return $html;
@ -220,31 +220,31 @@ sub html2text {
}
#-------------------------------------------------------------------
=head2 makeAbsolute ( session, html , [ baseURL ] )
Returns html with all relative links converted to absolute.
=head3 session
A reference to the current session.
=head3 html
The html to be made absolute.
=head3 baseURL
The base URL to use. Defaults to current page's url.
The base URL to use. Defaults to current page's url.
=cut
my $absolute = "";
sub makeAbsolute {
my $session = shift;
my $html = shift;
my $baseURL = shift;
my $baseURL = shift;
$absolute = "";
@ -306,7 +306,7 @@ sub makeAbsolute {
#-------------------------------------------------------------------
=head2 processReplacements ( session, content )
=head2 processReplacements ( session, content )
Processes text using the WebGUI replacements system.